BorderArtFormat.Set method (Publisher)

Sets the type of BorderArt applied to the specified shape.

Syntax

expression.Set (BorderArtName)

expression A variable that represents a BorderArtFormat object.

Parameters

Name	Required/Optional	Data type	Description
BorderArtName	Required	Variant	The name of the BorderArt type applied to the specified shape.

Remarks

You can also set the type of BorderArt applied to a shape by using the Name property.

Example

The following example tests for the existence of BorderArt on each shape for each page of the active document. Any BorderArt found is set to the same type.

Sub SetBorderArt() 
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 
 .Set(strBorderArtName) 
 End If 
 End With 
 Next anyShape 
 Next anyPage 
End Sub

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.