Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Uma coleção de todos os objetos da Secção no documento.
Comentários
Utilize Item (índice), em que (índice) é o número do índice, para devolver um único objeto de Secção . A utilização de Secções (índice), em que (índice) é o número do índice, também devolverá um único objeto Section .
Utilize Contagem para devolver o número de secções na publicação.
Utilize Adicionar (StartPageIndex), em que StartPageIndex é o número de índice da página, para devolver uma nova secção adicionada a um documento. É devolvido um erro "Permissão negada" se a página já contiver um cabeçalho de secção.
Utilize Section.Delete (índice), em que (índice) é o número do índice, para eliminar a secção especificada do documento. É devolvido um erro "Permissão negada" se for efetuada uma tentativa de eliminar a primeira secção.
Exemplo
O exemplo seguinte define o formato de número e o número inicial da primeira secção do documento ativo.
With ActiveDocument.Sections.Item(1)
.PageNumberFormat = pbPageNumberFormatArabic
.PageNumberStart = 1
End With
O exemplo seguinte continua a numeração da secção anterior para a segunda secção no documento ativo.
ActiveDocument.Sections(2).ContinueNumbersFromPreviousSection=True
O exemplo seguinte apresenta o número de secções no primeiro documento aberto.
MsgBox Documents(1).Sections.Count
O exemplo a seguir adiciona uma nova seção à segunda página da publicação ativa.
Dim objSection As Section
Set objSection = ActiveDocument.Sections.Add(StartPageIndex:=2)
O exemplo seguinte elimina todas as secções do documento ativo, exceto a primeira.
Observação
A iteração é da última à primeira para evitar um erro "Inferior à linha fora do intervalo" ao aceder a uma secção eliminada na coleção Secções .
Dim i As Long
For i = ActiveDocument.Sections.Count To 1 Step -1
If i = 1 Then Exit For
ActiveDocument.Sections(i).Delete
Next i
Métodos
Propriedades
Confira também
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.