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 .
This example creates a new document based on the Normal template and then displays the Save As dialog box.
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