Propriété Document.BuiltInDocumentProperties (Word)

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

Syntaxe

expression. BuiltInDocumentProperties

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

Remarques

Pour renvoyer un seul objet DocumentProperty qui représente une propriété de document prédéfinie spécifique, utilisez la propriété BuiltinDocumentProperties. Si Microsoft Word ne définit pas de valeur pour une des propriétés de document prédéfinies, la lecture de la propriété Value pour cette propriété de document génère une erreur.

Pour plus d’informations sur le renvoi d’un seul membre d’une collection, consultez Renvoi d’un objet à partir d’une collection.

Utilisez la propriété CustomDocumentProperties pour renvoyer la collection des propriétés de document personnalisées.

Exemple

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

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

Cet exemple montre comment afficher le nombre de mots contenus dans le document actif.

Sub DisplayTotalWords() 
 Dim intWords As Integer 
 intWords = ActiveDocument.BuiltInDocumentProperties(wdPropertyWords) 
 MsgBox "This document contains " & intWords & " words." 
End Sub

Voir aussi

Objet Document

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.