Document.BuiltInDocumentProperties Property (Word)

Office 2013 and later

Contribute to this content

Use GitHub to suggest and submit changes. See our guidelines for contributing to VBA documentation.

Returns a DocumentProperties collection that represents all the built-in document properties for the specified document.

expression .BuiltInDocumentProperties

expression Required. A variable that represents a Document object.

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.

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 
 .InsertAfter proDoc.Name & "= " 
 On Error Resume Next 
 .InsertAfter proDoc.Value 
 End With 
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