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
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.