Classe Sections (Word VBA)

Une collection d’objetsSection d’une sélection, d’une plage ou d’un document. Pour utiliser une variable de classe Sections, elle doit d'abord être instanciée, par exemple


Dim scts as Sections
Set scts = ActiveDocument.Range.Sections

For Each

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


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

Add

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

Add (Range, Start)


Set myRange = ActiveDocument.Paragraphs(3).Range 
ActiveDocument.Sections.Add Range:=myRange

Arguments

Optional arguments

Les arguments suivants sont facultatifs

Range (Range) - Plage avant laquelle vous souhaitez insérer le saut de section.

Start (WdSectionStart) - Le type de saut de section que vous souhaitez ajouter.


Valeurs possibles sont

wdSectionContinuous Saut de section continu.
wdSectionEvenPage Saut de section aux pages paires.
wdSectionNewColumn Saut de section aux nouvelles colonnes.
wdSectionNewPage Saut de section aux nouvelles pages.
wdSectionOddPage Saut de section aux pages impaires.

Count

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


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

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

Item

Renvoie un objet section spécifique appartenant à une collection.

Item (Index)

Index: Objet spécifique qui doit être renvoyé.


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

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

PageSetup

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


Documents("Summary.doc").Sections(1).PageSetup.Gutter = 36