Share via

BorderArt Property [Publisher 2003 VBA Language Reference]

  • Article

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.BorderArt()

expression Required. An expression that returns one of the objects in the Applies To list.

Remarks

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.

Example

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

Applies to | Shape Object