Returns a Documents collection that represents all the open documents. Read-only.
For information about returning a single member of a collection, see Returning an Object from a Collection.
Example
This example creates a new document based on the Normal template and then displays the Save As dialog box.
Documents.Add.Save
This example saves open documents that have changed since they were last saved.
Dim docLoop As Document
For Each docLoop In Documents
If docLoop.Saved = False Then docLoop.Save
Next docLoop
This example prints each open document after setting the left and right margins to 0.5 inch.
Dim docLoop As Document
For Each docLoop In Documents
With docLoop
.PageSetup.LeftMargin = InchesToPoints(0.5)
.PageSetup.RightMargin = InchesToPoints(0.5)
.PrintOut
End With
Next docLoop
This example opens Doc.doc as a read-only document.
Documents.Open FileName:="C:\Files\Doc.doc", ReadOnly:=True