Compartilhar via


Objeto BorderArt (Publisher)

Representa um tipo disponível de borda artística. Bordas artísticas são bordas de imagens que podem ser aplicadas a caixas de texto, quadros de imagens ou retângulos. O objeto BorderArt é um membro da coleção BorderArts. A coleção BorderArts contém todas as bordas artísticas disponíveis para uso na publicação especificada.

Comentários

A coleção BorderArts inclui todos os tipos de bordas artísticas personalizados criados pelo usuário para a publicação especificada.

Utilize a propriedade Item da coleção BorderArts para devolver um objeto BorderArt específico. O argumento Índice da propriedade Item pode ser o número ou nome do objeto BorderArt.

Use a propriedade Name para especificar qual tipo de borda artística ser aplicada a uma imagem.

Observação

Uma vez que Nome é a propriedade predefinida do objeto BorderArt e do objeto BorderArtFormat , não precisa de o indicar explicitamente ao definir o tipo BorderArt. A instrução Shape.BorderArtFormat = Document.BorderArts(1) é equivalente a Shape.BorderArtFormat.Name = Document.BorderArts(1).Name.

Exemplo

Este exemplo devolve os BorderArt com o nome Apples da publicação ativa.

Dim bdaTemp As BorderArt 
 
Set bdaTemp = ActiveDocument.BorderArts.Item (Index:="Apples") 

O exemplo seguinte define todos os LimitesArt num documento para o mesmo tipo com a propriedade Nome .

Sub SetBorderArtByName() 
 
Dim anyPage As Page 
Dim anyShape As Shape 
Dim strBorderArtName As String 
 
strBorderArtName = Document.BorderArts(1).Name 
 
For Each anyPage in ActiveDocument.Pages 
For Each anyShape in anyPage.Shapes 
With anyShape.BorderArt 
If .Exists = True Then 
.Name = strBorderArtName 
End If 
End With 
Next anyShape 
Next anyPage 
End Sub

Propriedades

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.