Excel to Word macros

[bullionraj]

I am trying to export excel data to word and came up with the code as below:

[code] ......

Dim appWord As Word.Application
Dim appdoc As Object
Dim docname As String



If Sheets("Peer Review - Service Portfolio").Range("B4").Value <> "" Then

Set appWord = CreateObject("Word.Application")

appWord.Visible = True
Sheets("Peer Review - Standard Factors").Range("B11:P1217").Copy

appWord.Documents.Add ("C:\Documents and Settings\Desktop\Smart scoping model\Limiting factors Word Output\Temp.doc")

appWord.Selection.PasteAndFormat (wdFormatPlainText)

Application.CutCopyMode = False


appWord.Activate
docname = appWord.Name
docname = "Limitin"
docname = docname & ".doc"
appWord.ActiveDocument.SaveAs docname, wdformat


End of Code}

I am getting the error user type undefined or not defined against the line


Dim appWord As Word.Application

Can anyone see the error in this?