Shape.HasSmartArt Property (Word)
Collapse the table of content
Expand the table of content
Important This document may not represent best practices for current development, links to downloads and other resources may no longer be valid. Current recommended version can be found here. ArchiveDisclaimer

Shape.HasSmartArt Property (Word)

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

Version Added: Word 2010

expression .HasSmartArt

expression A variable that represents a Shape object.

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." 
 MsgBox "The first shape contains no SmartArt." 
End If
© 2016 Microsoft