Shape.BorderArt Property (Publisher)
Returns a BorderArtFormat object that represents the BorderArt type applied to the specified shape. Returns "Permission Denied" if BorderArt has not been applied to the shape. Read-only.
expression A variable that represents a Shape object.
BorderArt are picture borders that can be applied to text boxes, picture frames, or rectangles.
Use the BorderArt property to apply, change, and remove BorderArt from shapes in publications.
The following example tests for the existence of BorderArt on each shape for each page of the active publication. If BorderArt exists, it is deleted.
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