Document.CustomDocumentProperties (Word)

Devuelve una colección DocumentProperties que representa todas las propiedades de documento personalizadas para el documento especificado.

Utilice la propiedad BuiltInDocumentProperties para devolver la colección de propiedades de documento integradas. Las propiedades del tipo msoPropertyTypeString (MsoDocProperties) no pueden superar los 255 caracteres de longitud. Para obtener información sobre cómo devolver un solo miembro de una colección, vea devolver un objeto de una colección.

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