Partager via


Propriété Application.SmartArtLayouts (Word)

Renvoie un objet SmartArtLayouts qui représente le jeu de dispositions SmartArt actuellement chargé dans l’application. En lecture seule.

Syntaxe

expression. SmartArtLayouts

Expression Expression qui renvoie un objet « Application ».

Remarques

L’ensemble des dispositions représentées par la propriété SmartArtLayouts correspond aux dispositions disponibles dans le groupe Dispositions de l’onglet Création de l’onglet contextuel Outils SmartArt dans Word.

Exemple

L’exemple de code suivant ajoute un graphique SmartArt au document actif, puis définit la disposition du graphique SmartArt sur « Liste groupée ».

Dim myShape As Shape 
Dim mySmartArt As SmartArt 
 
Set myShape = ActiveDocument.Shapes.AddSmartArt(Application.SmartArtLayouts(1), 50, 50, 200, 200) 
Set mySmartArt = myShape.SmartArt 
 
mySmartArt.Layout = Application.SmartArtLayouts(15)

Voir aussi

Objet Application

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.