Свойство Shape.HasSmartArt (Word)
Возвращает значение True , если на фигуре присутствует схема SmartArt. Только для чтения.
Синтаксис
выражение. HasSmartArt
Выражение Переменная, представляющая объект Shape .
Пример
В следующем примере кода показано, содержит ли первая фигура активного документа SmartArt.
Dim myShape As Shape
Set myShape = ActiveDocument.Shapes(1)
If myShape.HasSmartArt Then
MsgBox "The first shape contains SmartArt."
Else
MsgBox "The first shape contains no SmartArt."
End If
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.
Обратная связь
https://aka.ms/ContentUserFeedback.
Ожидается в ближайшее время: в течение 2024 года мы постепенно откажемся от GitHub Issues как механизма обратной связи для контента и заменим его новой системой обратной связи. Дополнительные сведения см. в разделеОтправить и просмотреть отзыв по