Объект Documents (Word)

Коллекция всех объектов Document, открытых в Word.

Замечания

Используйте свойство Documents , чтобы вернуть коллекцию Documents . В следующем примере отображаются имена открытых документов.

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

Используйте метод Add , чтобы создать пустой документ и добавить его в коллекцию Documents . В следующем примере создается новый документ на основе шаблона Обычный.

Documents.Add

Используйте метод Open , чтобы открыть файл. В следующем примере открывается документ с именем "Sales.doc".

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

Используйте Documents (Index), где Index — это имя документа или номер индекса для возврата одного объекта Document . Следующая инструкция закрывает документ с именем "Report.doc" без сохранения изменений.

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

Номер индекса представляет позицию документа в коллекции Documents . В следующем примере активируется первый документ в коллекции Documents .

Documents(1).Activate

В следующем примере перечисляется коллекция Documents , чтобы определить, открыт ли документ с именем "Report.doc". Если этот документ содержится в коллекции Документы , он активируется; В противном случае он открывается.

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

См. также

Справочник по объектной модели Word

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.