Share via

Shape.BorderArt Property (Publisher)

  • 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.

Syntax

expression .BorderArt

expression A variable that represents a Shape object.

Return Value

BorderArtFormat

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