Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Возвращает коллекцию 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 и обратная связь.