Document.CustomDocumentProperties (Word)

Renvoie une collection DocumentProperties qui représente toutes les propriétés de document personnalisées pour le document spécifié.

Utilisez la propriété BuiltInDocumentProperties pour renvoyer la collection des propriétés de document prédéfinies. Les propriétés de type msoPropertyTypeString (MsoDocProperties) ne peuvent pas dépasser 255 caractères. Pour plus d’informations sur le renvoi d’un seul membre d’une collection, voir renvoi d’un objet à partir d’une collection.

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