Compartilhar via


Propriedade Border.ArtStyle (Word)

Retorna ou define o design de borda gráfica de página para um documento. Leitura/gravação WdPageBorderArt.

Sintaxe

expression. ArtStyle

expression é obrigatório. Uma variável que representa um objeto 'Border'.

Exemplo

Este exemplo adiciona uma borda de pontos pretos ao redor de cada página da primeira seção da seleção.

Dim borderLoop As Border 
 
For Each borderLoop In Selection.Sections(1).Borders 
 With borderLoop 
 .ArtStyle = wdArtBasicBlackDots 
 .ArtWidth = 6 
 End With 
Next borderLoop

Este exemplo adiciona uma borda de figura ao redor de cada página da seção um do documento ativo.

Dim borderLoop As Border 
 
With ActiveDocument.Sections(1) 
 .Borders.AlwaysInFront = True 
 For Each borderLoop In .Borders 
 With borderLoop 
 .ArtStyle = wdArtPeople 
 .ArtWidth = 15 
 End With 
 Next borderLoop 
End With

Confira também

Objeto Border

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.