Compartilhar via


Objeto Secções (Publisher)

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.