Documents 集合对象

Application Documents (Document) 多种对象

由 Word 当前打开的所有 Document 对象所组成的集合。

使用 Documents 集合

用 Documents 属性可返回 Documents 集合。下列示例显示各打开文档的名称。

For Each aDoc In Documents
    aName = aName & aDoc.Name & vbCr
Next aDoc
MsgBox aName

用 Add 方法可创建一篇新的空文档，并将其添加到 Documents 集合中。下列示例创建一篇基于 Normal 模板的新文档。

Documents.Add

用 Open 方法可打开文档。下列示例打开名为“Sales.doc”的文档。

Documents.Open FileName:="C:\My Documents\Sales.doc"

用 Documents(index) 可返回单个的 Document 对象，其中 index 是文档的名称或索引序号。下列示例关闭名为“Report.doc”的文档，并且不保存所做的修改。

Documents("Report.doc").Close SaveChanges:=wdDoNotSaveChanges

索引序号代表文档在 Documents 集合中的位置。下列示例激活 Documents 集合中的第一篇文档。

Documents(1).Activate

说明

下列示例查看 Documents 集合以判定名为“Report.doc”的文档是否已打开。如果该文档包含在 Documents 集合中，则激活该文档；否则，打开该文档。

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