Checking for a specific document is open in a Word macro?

[GZook]

At the beginning of my Word macro, I would like to have a simple If structure to determine that the correct document is open before continuing with macro processing, maybe by checking the file name. How can this be done ?

 

[acron]

Create the following Function :

Function IsDocOpen(strDocName)
Dim oDoc As Document
For Each oDoc In Documents
If oDoc.Name = strDocName Then
IsDocOpen = True
Else
IsDocOpen = False
End If
Next oDoc
End Function

You can then use

If IsDocOpen("Correct.doc&quot then
' Do process .............

A.C.

 

[GZook]

Thank you Acron.