Compartilhar via

Método Borders.ApplyPageBordersToAllSections (Word)

  • Artigo

Aplica a formatação de borda de página especificada a todas as seções de um documento.

Sintaxe

expression. ApplyPageBordersToAllSections

expression é obrigatório. Uma variável que representa uma coleção 'Borders'.

Exemplo

Este exemplo adiciona uma borda de página de uma linha a todas as seções do documento ativo.

Dim borderLoop As Border 
 
With ActiveDocument.Sections(1) 
 For Each borderLoop In .Borders 
 With borderLoop 
 .LineStyle = wdLineStyleSingle 
 .LineWidth = wdLineWidth050pt 
 End With 
 Next borderLoop 
 .Borders.ApplyPageBordersToAllSections 
End With

Confira também

Objeto da coleção Borders

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.