Compartir a través de


Objeto Sections (Word)

Una colección de sección objetos en un documento, selección o intervalo.

Comentarios

Utilice la propiedad Sections para devolver la colección Sections. En el ejemplo siguiente se inserta texto al final de la última sección del documento activo.

With ActiveDocument.Sections.Last.Range 
 .Collapse Direction:=wdCollapseEnd 
 .InsertAfter "end of document" 
End With

Utilice la ventana Agregar método o el InsertBreak método para agregar una nueva sección a un documento. En el ejemplo siguiente se agrega una nueva sección al principio del documento activo.

Set myRange = ActiveDocument.Range(Start:=0, End:=0) 
ActiveDocument.Sections.Add Range:=myRange 
myRange.InsertParagraphAfter

En el siguiente ejemplo, se muestra el número de secciones del documento activo, se agrega un salto de sección delante del primer párrafo de la selección y, a continuación, vuelve a mostrarse el número de secciones.

MsgBox ActiveDocument.Sections.Count & " sections" 
Selection.Paragraphs(1).Range.InsertBreak _ 
 Type:=wdSectionBreakContinuous 
MsgBox ActiveDocument.Sections.Count & " sections"

Use Sections (index), donde index es el número de índice, para devolver un único objeto Section . El ejemplo siguiente cambia los márgenes de página izquierdo y derecho de la primera sección del documento activo.

With ActiveDocument.Sections(1).PageSetup 
 .LeftMargin = InchesToPoints(0.5) 
 .RightMargin = InchesToPoints(0.5) 
End With

Métodos

Nombre
Add
Elemento

Propiedades

Nombre
Aplicación
Count
Creator
Primero
Último
PageSetup
Parent

Vea también

Referencia de modelos de objetos de Word

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.