Document.BuiltInDocumentProperties Property (Word)
Returns a DocumentProperties collection that represents all the built-in document properties for the specified document.
Syntax
expression .BuiltInDocumentProperties
expression Required. A variable that represents a Document object.
Remarks
To return a single DocumentProperty object that represents a specific built-in document property, use the BuiltinDocumentProperties property. If Microsoft Word doesn't define a value for one of the built-in document properties, reading the Value property for that document property generates an error.
For information about returning a single member of a collection, see Returning an Object from a Collection.
Use the CustomDocumentProperties property to return the collection of custom document properties.
Example
This example inserts a list of built-in properties at the end of the active document.
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
This example displays the number of words in the active document.
Sub DisplayTotalWords()
Dim intWords As Integer
intWords = ActiveDocument.BuiltInDocumentProperties(wdPropertyWords)
MsgBox "This document contains " & intWords & " words."
End Sub