Opening word document read only

[ChrisOswald]

I have a userform that's a bit... busy. There's a word document that's been written that describes how to use this form. Using this code:

Private Sub cmdHelp_Click()
    CreateObject("word.Application").Documents _
            .Open("C:\Documents and Settings\oswalcj\My Documents\Outreach Tool Maintenance Instructions.docx", _
                  ReadOnly:=True) _
                  .Application.Visible = True
End Sub

opens the document read only. However, when I close it, I get an alert popup saying:

This file is in use by another application or user. (C:\...\Templates\Normal.dotm)

with a show help>> button under it.
Clicking ok gives me a Save As dialogue for Normal.dotm, which won't let me save, and then a bunch of other boxes basically going through the same rigamarole.

It works fine in 2003, but on the 2 2007 machines I've tested it on I get the above goofiness. Any ideas?

 

[ChrisOswald]

Nevermind, figured it out.
It looks like the problem was having a 2nd instance of word open. (i'm not sure how it happened on the second machine, but). This appears to be a fix.

Sub asfd()
    On Error GoTo CreateInstead
    GetObject(, "word.Application").Documents _
            .Open("C:\Documents and Settings\oswalcj\My Documents\AVP Outreach Tool Maintenance Instructions.docx", _
                  ReadOnly:=True) _
                  .Application.Visible = True
    On Error GoTo 0
    Exit Sub
CreateInstead:
    CreateObject("word.Application").Documents _
            .Open("C:\Documents and Settings\oswalcj\My Documents\AVP Outreach Tool Maintenance Instructions.docx", _
                  ReadOnly:=True) _
                  .Application.Visible = True
    Resume Next
End Sub

I guess it'd be better to do a variable assignment, and 'walk' down the cases, ending with 'Word not installed', but this is close enough for now.