Partager via

Propriété Document.CustomDocumentProperties (Word)

  • Article

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

Syntaxe

expression. CustomDocumentProperties

expression Obligatoire. Variable qui représente un objet Document.

Remarques

Utilisez la propriété BuiltInDocumentProperties pour renvoyer la collection de propriétés de document intégrées.

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, consultez Renvoi d’un objet à partir d’une collection.

Exemple

Cet exemple montre comment insérer une liste de propriétés de document personnalisées à la fin du document actif.

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

Cet exemple montre comment ajouter une propriété de document personnalisée à Sales.doc.

thename = InputBox("Please type your name", "Name") 
Documents("Sales.doc").CustomDocumentProperties.Add _ 
 Name:="YourName", LinkToContent:=False, Value:=thename, _ 
 Type:=msoPropertyTypeString

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.