Clase Section (Word VBA)

La clase Section representa una sola sección en un documento, selección o intervalo.

El principal procedimiento de la clase Section es Sections.Add

Set

Para usar una variable de clase Section, primero debe ser instanciado, por ejemplo

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

Los siguientes procedimientos se pueden usar para establecer variables de clase Section : Sections.Add, Sections.Item, Sections.First, Sections.Last, Document.Sections, Range.Sections y Selection.Sections

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos Section en una colección.

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

Métodos

Este es el método principal de la clase Section

Sections.Add - Devuelve un objeto section que representa una nueva sección agregada a un documento.

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

Propiedades

Borders Devuelve una colección Borders que representa todos los bordes de la sección.

ActiveDocument.Range.Sections(1).Borders =

Footers Devuelve una colección HeadersFooters que representa los pies de página de la sección especificada.

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

Headers Devuelve una colección HeadersFooters que representa los encabezados de la sección especificada.

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

Index Devuelve un valor de tipo Long que representa la posición de un elemento en una colección.

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

PageSetup Devuelve un objeto PageSetup que está asociado a la sección especificada.

ActiveDocument.Range.Sections(1).PageSetup =

Parent Devuelve un objeto Object que representa el objeto primario del objeto Section especificado.

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

ProtectedForForms True si la sección especificada está protegida para formularios.

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

Range Devuelve un objeto Range que representa la parte de un documento incluida en el objeto especificado.

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

Sections.Count Devuelve un Long que representa el número de secciones de la colección.

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

Sections.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

Sections.Last Devuelve el último elemento de la colección Sections como objeto Section.

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

Sections.PageSetup Devuelve un objeto PageSetup que está asociado con el documento, intervalo, sección, secciones o selección especificados.

ActiveDocument.Range.Sections.PageSetup =

Sections.Parent Devuelve un objeto Object que representa el objeto primario del objeto Sections especificado.

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