Upravit

Sdílet prostřednictvím

Shape.HasSmartArt property (Word)

  • Článek

Returns True if there is a SmartArt diagram present on the shape. Read-only.

Syntax

expression. HasSmartArt

expression A variable that represents a Shape object.

Example

The following code example displays whether or not the first shape in the active document contains 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

See also

Shape Object

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.