Propriedade Borders.EnableOtherPagesInSection (Word)
True se as bordas de página estão habilitadas para todas as páginas da seção, exceto a primeira página. Boolean de leitura/gravação.
Sintaxe
expression. EnableOtherPagesInSection
Expressão Uma variável que representa um objeto 'Borders'.
Exemplo
Este exemplo adiciona uma borda ao redor de cada página da primeira seção na seleção, exceto da primeira página.
Dim borderLoop As Border
With Selection.Sections(1)
.Borders.EnableFirstPageInSection = False
.Borders.EnableOtherPagesInSection = True
For Each borderLoop In .Borders
borderLoop.ArtStyle = wdArtBabyRattle
borderLoop.ArtWidth = 22
Next borderLoop
End With
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.