Run-time Error 5174: Open Word Documents from Excel

[tinfanide]

Early binding; opening a Word Document from Excel VBA.
First time, no error.


Starting from then, it returns the error stated in the codes below:
How could I fix it?

Public Sub SendToWord()

Dim myWord As Word.Application
Set myWord = New Word.Application
With myWord
    .Visible = True
    ''' Run-time Error 5174
    ''' Application-defined Error or Object-defined Error
    myWord.Documents.Open Filename:="1.doc"
End With

[macropod]

Originally Posted by tinfanide

Early binding; opening a Word Document from Excel VBA.
First time, no error.
Starting from then, it returns the error

Could be a timing issue. You might need to set up a loop to test whether the Word app has loaded before continuing.

[tinfanide]

Yes, it might be.

[BobBridges]

When I google 5174 for VBA/Word, it seems always to be the file-not-found error. Are you sure you're getting the error at the .Visible=True statement rather than the .Open statement? (Of course that doesn't explain why the file may have disappeared, but still, first things first.)