Documents Collection Object

A collection of all the Document objects that are currently open in Word.

Using the Documents Collection

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
		

Remarks

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's 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