Объект BorderArt (publisher)

Статья
04/07/2023

Представляет доступный тип BorderArt. BorderArt — это границы рисунка, которые можно применять к текстовым полям, рамкам рисунков или прямоугольникам. Объект BorderArt является членом коллекции BorderArts . Коллекция BorderArts содержит все элементы BorderArt, доступные для использования в указанной публикации.

Замечания

Коллекция BorderArts включает все пользовательские типы BorderArt, созданные пользователем для указанной публикации.

Используйте свойство Item коллекции BorderArts , чтобы вернуть определенный объект BorderArt. Аргумент Index свойства Item может быть номером или именем объекта BorderArt.

Используйте свойство Name , чтобы указать тип BorderArt, который требуется применить к изображению.

Примечание.

Так как Name является свойством по умолчанию как для объекта BorderArt, так и для объекта BorderArtFormat , его не нужно указывать явным образом при задании типа BorderArt. Shape.BorderArtFormat = Document.BorderArts(1) Оператор эквивалентен Shape.BorderArtFormat.Name = Document.BorderArts(1).Name.

Пример

В этом примере возвращается элемент BorderArt с именем Apples из активной публикации.

Dim bdaTemp As BorderArt 
 
Set bdaTemp = ActiveDocument.BorderArts.Item (Index:="Apples")

В следующем примере для всех элементов BorderArt в документе задается один и тот же тип с помощью свойства Name .

Sub SetBorderArtByName() 
 
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 
.Name = strBorderArtName 
End If 
End With 
Next anyShape 
Next anyPage 
End Sub

Свойства

См. также

Справочник по объектной модели издателя

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через