CustomDocumentProperties Property

Returns a DocumentProperties collection that represents all the custom document properties for the specified document.

expression.CustomDocumentProperties

expression Required. An expression that returns one of the objects in the Applies To list.

Remarks

Use the BuiltInDocumentProperties property to return the collection of built-in document properties.

For information about returning a single member of a collection, see Returning an Object from a Collection .

Properties of type msoPropertyTypeString cannot exceed 255 characters in length.

Example

This example inserts a list of custom built-in properties at the end of the active document.

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

This example adds a custom built-in property to Sales.doc.

thename = InputBox("Please type your name", "Name")
Documents("Sales.doc").CustomDocumentProperties.Add _
    Name:="YourName", LinkToContent:=False, Value:=thename, _
    Type:=msoPropertyTypeString

Applies to | Document Object | Template Object

See Also | BuiltInDocumentProperties Property