Clase Sections (Word VBA)
Colección de objetos section de una selección, intervalo o documento. Para usar una variable de clase Sections, primero debe ser instanciado, por ejemplo
Dim scts as Sections
Set scts = ActiveDocument.Range.Sections
For Each
A continuación, se muestra un ejemplo de cómo procesar los elementos Sections en una colección.
Dim sec As Section
For Each sec In ActiveDocument.Range.Sections
Next sec
Add
Devuelve un objeto section que representa una nueva sección agregada a un documento.
Set myRange = ActiveDocument.Paragraphs(3).Range
ActiveDocument.Sections.Add Range:=myRange
Arguments
Optional arguments
Los siguientes argumentos son opcionales
Range - Range
Start (WdSectionStart) - El tipo de salto de sección que desee agregar.
Valores posibles son
wdSectionContinuous | Salto de sección continua. |
wdSectionEvenPage | Salto de sección de página par. |
wdSectionNewColumn | Salto de sección de columna nueva. |
wdSectionNewPage | Salto de sección de página nueva. |
wdSectionOddPage | Salto de sección de página impar. |
Count
Devuelve un Long que representa el número de secciones de la colección.
Dim lngCount As Long
lngCount = ActiveDocument.Range.Sections.Count
First
Devuelve un objeto section que representa el primer elemento de la colección Sections .
Dim secFirst As Section
Set secFirst = ActiveDocument.Range.Sections.First
Item
Devuelve un objeto section individual de una colección.
Item (Index)
Index: El objeto individual que se va a devolver.
Dim sec As Section
Set sec = ActiveDocument.Range.Sections(Index:=1)
Last
Devuelve el último elemento de la colección Sections como objeto Section.
Dim secLast As Section
Set secLast = ActiveDocument.Range.Sections.Last
PageSetup
Devuelve un objeto PageSetup que está asociado con el documento, intervalo, sección, secciones o selección especificados.
Documents("Summary.doc").Sections(1).PageSetup.Gutter = 36