Note
Access to this page requires authorization. You can try signing in or changing directories.
Access to this page requires authorization. You can try changing directories.
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.