Propriété Shape.BorderArt (Publisher)
Renvoie un objet BorderArtFormat qui représente le type de bordure spéciale appliqué à la forme spécifiée. Renvoie « Autorisation refusée » si aucune bordure spéciale n'a été appliquée à la forme. En lecture seule.
Syntaxe
expression. BorderArt
Expression Variable qui représente un objet Shape .
Valeur renvoyée
BorderArtFormat
Remarques
Les bordures spéciales sont des bordures d'image pouvant être appliquées à des zones de texte, des cadres d'image, ou des rectangles.
Utilisez la propriété BorderArt pour appliquer, modifier et supprimer des bordures spéciales à partir de formes dans des compositions.
Exemple
L'exemple suivant montre comment tester la présence de bordures spéciales sur chaque forme de la composition active. S'il existe des bordures spéciales, elles sont supprimées.
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
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.