BorderArtFormat.Delete, méthode (Publisher)

Supprime l'objet spécifié.

Syntaxe

expression. Supprimer

Expression Variable qui représente un objet BorderArtFormat .

Remarques

Une erreur d’exécution survient si l’objet spécifié n’existe pas.

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.