Documents Collection Object (Word)
A collection of all the Document objects that are currently open in Word.
Remarks
Use the Documents property to return the Documents collection. The following example displays the names of the open documents.
For Each aDoc In Documents
aName = aName & aDoc.Name & vbCr
Next aDoc
MsgBox aName
Use the Add method to create a new empty document and add it to the Documents collection. The following example creates a new document based on the Normal template.
Documents.Add
Use the Open method to open a file. The following example opens the document named "Sales.doc."
Documents.Open FileName:="C:\My Documents\Sales.doc"
Use Documents(Index), where Index is the document name or index number to return a single Document object. The following instruction closes the document named "Report.doc" without saving changes.
Documents("Report.doc").Close SaveChanges:=wdDoNotSaveChanges
The index number represents the position of the document in the Documents collection. The following example activates the first document in the Documents collection.
Documents(1).Activate
The following example enumerates the Documents collection to determine whether the document named "Report.doc" is open. If this document is contained in the Documents collection, the document is activated; otherwise, it is opened.
For Each doc In Documents
If doc.Name = "Report.doc" Then found = True
Next doc
If found <> True Then
Documents.Open FileName:="C:\Documents\Report.doc"
Else
Documents("Report.doc").Activate
End If