Propriété Shape.HasSmartArt (Word)

Renvoie la valeur True s'il existe un diagramme SmartArt sur la forme. En lecture seule.

Syntaxe

expression. HasSmartArt

Expression Variable qui représente un objet Shape .

Exemple

L’exemple de code suivant affiche si la première forme du document actif contient ou non un diagramme 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

Voir aussi

Shape, objet

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.