Propriété Subdocuments.Expanded (Word)

True si les sous-documents contenus dans le document spécifié sont développés. Boolean (en lecture/écriture).

Syntaxe

expression. Expanded

Expression Variable qui représente un objet « Subdocument ».

Exemple

Cet exemple montre comment développer tous les sous-documents contenus dans le document maître actif.

If ActiveDocument.Subdocuments.Count >= 1 Then 
 ActiveDocument.Subdocuments.Expanded = True 
End If

Cet exemple montre comment la propriété Expanded entre développer tous les sous-documents dans la fenêtre active et la réduction de tous les sous-documents du document actif.

ActiveDocument.Subdocuments.Expanded = _ 
 Not ActiveDocument.Subdocuments.Expanded

Cet exemple montre comment savoir si les sous-documents contenus dans le document « Report.doc » sont développés, puis afficher un message indiquant leur état.

If Documents("Report.doc").Subdocuments.Expanded = True Then 
 MsgBox "All available information is displayed." 
Else 
 MsgBox "Expand subdocuments for more information." 
End If

Voir aussi

Subdocuments, Collection d'objets

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.