Classe Section (Word VBA)

La classe Section représente une section dans une sélection, une plage ou un document.

La procédure principale de la classe Section est Sections.Add

Set

Pour utiliser une variable de classe Section, elle doit d'abord être instanciée, par exemple

Dim sec as Section
Set sec = ActiveDocument.Range.Sections(Index:=1)

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe Section : Sections.Add, Sections.Item, Sections.First, Sections.Last, Document.Sections, Range.Sections et Selection.Sections

For Each

Voici un exemple de traitement des éléments Section dans une collection

Dim sec As Section
For Each sec In ActiveDocument.Range.Sections
	
Next sec

Méthodes

C'est la méthode principale de la classe Section

Sections.Add - Renvoie un objet section qui représente une nouvelle section ajoutée à un document.

Dim sec As Section
Set sec = ActiveDocument.Range.Sections.Add()

Propriétés

Borders Renvoie une collection Borders qui représente la totalité des bordures de la section.

ActiveDocument.Range.Sections(1).Borders =

Footers Renvoie une collection HeadersFooters qui représente les pieds de page dans la section spécifiée.

Dim hfsFooters As HeadersFooters
Set hfsFooters = ActiveDocument.Range.Sections(1).Footers

Headers Renvoie une collection HeadersFooters qui représente les en-têtes de la section spécifiée.

Dim hfsHeaders As HeadersFooters
Set hfsHeaders = ActiveDocument.Range.Sections(1).Headers

Index Renvoie un type long qui représente la position d'un élément dans une collection.

Dim lngIndex As Long
lngIndex = ActiveDocument.Range.Sections(1).Index

PageSetup Renvoie un objet PageSetup associé à la section spécifiée.

ActiveDocument.Range.Sections(1).PageSetup =

Parent Renvoie un Object qui représente l'objet parent de l'objet Section spécifié.

Dim objParent As Object
Set objParent = ActiveDocument.Range.Sections(1).Parent

ProtectedForForms Cette propriété a la valeur True si la section spécifiée est protégée contre la modification des formulaires.

ActiveDocument.Range.Sections(1).ProtectedForForms = True

Range Renvoie un objet Range qui représente la partie d'un document contenue dans l'objet spécifié.

Dim rngRange As Range
Set rngRange = ActiveDocument.Range.Sections(1).Range

Sections.Count Renvoie un type long qui représente le nombre de sections dans la collection.

Dim lngCount As Long
lngCount = ActiveDocument.Range.Sections.Count

Sections.First Renvoie un objet section qui représente le premier élément de la collection sections .

Dim secFirst As Section
Set secFirst = ActiveDocument.Range.Sections.First

Sections.Last Renvoie le dernier élément de la collection Sections sous forme d'un objet Section.

Dim secLast As Section
Set secLast = ActiveDocument.Range.Sections.Last

Sections.PageSetup Renvoie un objet PageSetup associé au document, à la plage, à la section, aux sections ou à la sélection spécifiés.

ActiveDocument.Range.Sections.PageSetup =

Sections.Parent Renvoie un Object qui représente l'objet parent de l'objet Sections spécifié.

Dim objParent As Object
Set objParent = ActiveDocument.Range.Sections.Parent