Свойство Document.CustomDocumentProperties (Word)
Возвращает коллекцию DocumentProperties , представляющую все настраиваемые свойства документа для указанного документа.
Синтаксис
expression. CustomDocumentProperties
выражение (обязательно). Переменная, представляющая объект Document .
Замечания
Используйте свойство BuiltInDocumentProperties , чтобы вернуть коллекцию встроенных свойств документа.
Свойства типа msoPropertyTypeString (MsoDocProperties) не могут превышать 255 символов в длину.
Сведения о возврате одного члена коллекции см. в разделе Возвращение объекта из коллекции.
Пример
В этом примере в конец активного документа вставляется список настраиваемых свойств документа.
Set myRange = ActiveDocument.Content
myRange.Collapse Direction:=wdCollapseEnd
For Each prop In ActiveDocument.CustomDocumentProperties
With myRange
.InsertParagraphAfter
.InsertAfter prop.Name & "= "
.InsertAfter prop.Value
End With
Next
В этом примере в Sales.doc добавляется пользовательское свойство документа.
thename = InputBox("Please type your name", "Name")
Documents("Sales.doc").CustomDocumentProperties.Add _
Name:="YourName", LinkToContent:=False, Value:=thename, _
Type:=msoPropertyTypeString
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.