Свойство 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

См. также

Объект Shape

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

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