Hello, I have a macro that i execute within the document to open another word docx. When I exit the document i get this error.


Sub OPENBARCODE()
'
' OPENBARCODE Macro
'
'
Dim WordApp As Object
Dim WordDoc As Object

Set WordApp = CreateObject("Word.Application")
Set WordDoc = WordApp.Documents.Open(FileName:="C:\Documents and Settings\Administrator\Desktop\sMD1.docx")
WordApp.Visible = True



Set WordDoc = Nothing
Set WordApp = Nothing

End Sub
Any thoughts?