Partager via


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.