Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Représente un sous-document dans un document ou une plage. L’objet Subdocument est membre de la collection Subdocuments . La collection Subdocuments inclut tous les sous-documents d’une plage ou d’un document.
Remarques
Utilisez les sous-documents (Index), où Index est le numéro d'index, pour renvoyer un seul objet Subdocument. L'exemple suivant affiche le chemin d'accès et le nom du premier sous-document du document actif.
If ActiveDocument.Subdocuments(1).HasFile = True Then
MsgBox ActiveDocument.Subdocuments(1).Path & _
Application.PathSeparator & _
ActiveDocument.Subdocuments(1).Name
End If
Utilisez la méthode AddFromFile ou AddFromRange pour ajouter un sous-document à un document. L'exemple suivant ajoute un sous-document nommé « Setup.doc » à la fin du document actif.
ActiveDocument.Subdocuments.Expanded = True
Selection.EndKey Unit:=wdStory
Selection.InsertParagraphBefore
ActiveDocument.Subdocuments.AddFromFile Name:="C:\Temp\Setup.doc"
Cet exemple montre comment appliquer le style Heading 1 au premier paragraphe de la sélection et créer ensuite un sous-document avec le contenu de la sélection.
Selection.Paragraphs(1).Style = wdStyleHeading1
With ActiveDocument.Subdocuments
.Expanded = True
.AddFromRange Range:=Selection.Range
End With
Voir aussi
Référence du modèle objet Word
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.