Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
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.