Document.Subdocuments (Word)
Renvoie une collection Subdocuments qui représente tous les sous-documents du document spécifié.
Pour plus d’informations sur le renvoi d’un seul membre d’une collection, voir renvoi d’un objet à partir d’une collection.
MsgBox ActiveDocument.Subdocuments.Count