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

See also

BorderArtFormat Object