Свойство Shape.BorderArt (издатель)
Возвращает объект BorderArtFormat , представляющий тип BorderArt, применяемый к указанной фигуре. Возвращает значение "Отказано в разрешении", если элемент BorderArt не был применен к фигуре. Только для чтения.
Синтаксис
expression. BorderArt
Выражение Переменная, представляющая объект Shape .
Возвращаемое значение
BorderArtFormat
Замечания
BorderArt — это границы рисунков, которые можно применять к текстовым полям, рамкам рисунков или прямоугольникам.
Используйте свойство BorderArt для применения, изменения и удаления BorderArt из фигур в публикациях.
Пример
В следующем примере проверяется наличие элемента BorderArt на каждой фигуре для каждой страницы активной публикации. Если BorderArt существует, он удаляется.
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
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.
Обратная связь
https://aka.ms/ContentUserFeedback.
Ожидается в ближайшее время: в течение 2024 года мы постепенно откажемся от GitHub Issues как механизма обратной связи для контента и заменим его новой системой обратной связи. Дополнительные сведения см. в разделеОтправить и просмотреть отзыв по