Objet sections (Word)
Collection d’objets Section dans une sélection, une plage ou un document.
Remarques
Utilisez la propriété Sections pour renvoyer la collection Sections. L’exemple suivant montre comment insérer du texte à la fin de la dernière section du document actif.
With ActiveDocument.Sections.Last.Range
.Collapse Direction:=wdCollapseEnd
.InsertAfter "end of document"
End With
Utilisez la méthode Add ou la méthode InsertBreak pour ajouter une nouvelle section à un document. L'exemple suivant montre comment ajouter une nouvelle section au début du document actif.
Set myRange = ActiveDocument.Range(Start:=0, End:=0)
ActiveDocument.Sections.Add Range:=myRange
myRange.InsertParagraphAfter
L'exemple suivant montre comment afficher le nombre de sections du document actif, ajouter un saut de section au-dessus du premier paragraphe de la sélection, puis afficher de nouveau le nombre de sections.
MsgBox ActiveDocument.Sections.Count & " sections"
Selection.Paragraphs(1).Range.InsertBreak _
Type:=wdSectionBreakContinuous
MsgBox ActiveDocument.Sections.Count & " sections"
Utilisez Sections (index), où index est le numéro d’index, pour renvoyer un seul objet Section . L’exemple suivant montre comment modifier les marges de gauche et de droite de la première section du document actif.
With ActiveDocument.Sections(1).PageSetup
.LeftMargin = InchesToPoints(0.5)
.RightMargin = InchesToPoints(0.5)
End With
Méthodes
Nom |
---|
Add |
Élément |
Propriétés
Nom |
---|
Application |
Count |
Creator |
First |
Last |
PageSetup |
Parent |
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.