Свойство Document.BuiltInDocumentProperties (Word)

Статья
04/07/2023

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

Синтаксис

выражение. BuiltInDocumentProperties

выражение (обязательно). Переменная, представляющая объект Document .

Замечания

Чтобы вернуть один объект DocumentProperty , представляющий определенное встроенное свойство документа, используйте свойство BuiltinDocumentProperties . Если Microsoft Word не определяет значение для одного из встроенных свойств документа, чтение свойства Value для этого свойства документа приведет к ошибке.

Сведения о возврате одного члена коллекции см. в разделе Возвращение объекта из коллекции.

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

Пример

В этом примере в конец активного документа вставляется список встроенных свойств.

Sub ListProperties() 
 Dim rngDoc As Range 
 Dim proDoc As DocumentProperty 
 
 Set rngDoc = ActiveDocument.Content 
 
 rngDoc.Collapse Direction:=wdCollapseEnd 
 
 For Each proDoc In ActiveDocument.BuiltInDocumentProperties 
 With rngDoc 
 .InsertParagraphAfter 
 .InsertAfter proDoc.Name & "= " 
 On Error Resume Next 
 .InsertAfter proDoc.Value 
 End With 
 Next 
End Sub

В этом примере отображается количество слов в активном документе.

Sub DisplayTotalWords() 
 Dim intWords As Integer 
 intWords = ActiveDocument.BuiltInDocumentProperties(wdPropertyWords) 
 MsgBox "This document contains " & intWords & " words." 
End Sub

См. также

Объект Document

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

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

Поделиться через