Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Représente un type de bordure spéciale disponible. Les bordures spéciales sont des bordures d'image pouvant être appliquées à des zones de texte, des cadres d'image ou des rectangles. L'objet BorderArt est membre de la collection BorderArts. La collection BorderArts contient toutes les bordures spéciales disponibles pour une utilisation dans la composition spécifiée.
Remarques
La collection BorderArts contient tous les types de bordures spéciales personnalisés créés par l'utilisateur pour la composition spécifiée.
Utilisez la propriété Item de la collection BorderArts pour renvoyer un objet BorderArt spécifique. L’argument Index de la propriété Item peut être le numéro ou le nom de l’objet BorderArt.
Utilisez la propriété Name pour spécifier le type de bordure spéciale à appliquer à une image.
Remarque
Étant donné que Name est la propriété par défaut de l’objet BorderArt et de l’objet BorderArtFormat , vous n’avez pas besoin de l’indiquer explicitement lors de la définition du type BorderArt. L’instruction Shape.BorderArtFormat = Document.BorderArts(1) est équivalente à Shape.BorderArtFormat.Name = Document.BorderArts(1).Name.
Exemple
Cet exemple montre comment renvoyer l’objet BorderArt nommé Apples à partir de la composition active.
Dim bdaTemp As BorderArt
Set bdaTemp = ActiveDocument.BorderArts.Item (Index:="Apples")
L’exemple suivant définit tous les borderArt d’un document sur le même type à l’aide de la propriété Name .
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
Propriétés
Voir aussi
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.