Objeto Seções (Word)

Uma coleção de seção objetos em uma seleção, intervalo ou documento.

Comentários

Use a propriedade seções para retornar da coleção Sections. O exemplo seguinte insere texto no final da última seção do documento ativo.

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

Use a Adicionar método ou o InsertBreak método adicionar uma nova seção a um documento. O exemplo a seguir adiciona uma nova seção no início do documento ativo.

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

O exemplo a seguir exibe o número de seções do documento ativo, adiciona uma quebra de seção acima do primeiro parágrafo da seleção e exibe novamente o número de seções.

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

Use Seções (índice), em que o índice é o número do índice, para retornar um único objeto Section . O exemplo seguinte altera as margens esquerda e direita da página para a primeira seção do documento ativo.

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

Métodos

Nome
Adicionar
Item

Propriedades

Nome
Aplicativo
Count
Creator
Primeira
Último
PageSetup
Parent

Confira também

Referência do modelo de objeto do Word

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.