Propriété InlineShape.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 « InlineShape ».

Exemple

L’exemple de code suivant affiche si la première forme insérée du document actif contient ou non un diagramme SmartArt.

Dim myInlineShape As InlineShape 
 
Set myInlineShape = ActiveDocument.InlineShapes(1) 
 
If myInlineShape.HasSmartArt Then 
 MsgBox "The first shape contains SmartArt." 
Else 
 MsgBox "The first shape contains no SmartArt." 
End If

Voir aussi

Objet InlineShape

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.