Document.BuiltInDocumentProperties (Word)

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

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.

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