Compartilhar via

Propriedade Shape.BorderArt (Publisher)

  • Artigo

Retorna um objeto BorderArtFormat que representa o tipo de borda artística aplicado à forma especificada. Retorna "Permissão Negada" se a borda artística não tiver sido aplicada à forma. Somente leitura.

Sintaxe

expressão. BorderArt

Expressão Uma variável que representa um objeto Shape .

Valor de retorno

BorderArtFormat

Comentários

As bordas artísticas são bordas de imagens que podem ser aplicadas a caixas de textos, quadros de imagens ou retângulos.

Use a propriedade BorderArt para aplicar, alterar e remover bordas artísticas de formas em publicações.

Exemplo

O exemplo a seguir testa a existência de bordas artísticas em cada forma de cada página da publicação ativa. Se houver bordas artísticas, elas serão excluídas.

Sub DeleteBorderArt() 
 
Dim anyPage As Page 
Dim anyShape As Shape 
 
For Each anyPage in ActiveDocument.Pages 
 For Each anyShape in anyPage.Shapes 
 With anyShape.BorderArt 
 If .Exists = True Then 
 .Delete 
 End If 
 End With 
 Next anyShape 
 Next anyPage 
End Sub

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.