Partager via


Propriété Application.SmartArtColors (Word)

Renvoie un objet SmartArtColors qui représente le jeu de styles de couleurs actuellement chargé dans l’application. En lecture seule.

Syntaxe

expression. SmartArtColors

Expression Expression qui renvoie un objet « Application ».

Remarques

Le jeu de couleurs représenté par la propriété SmartArtColors correspond aux styles de couleurs disponibles sur le bouton Modifier les couleurs sous 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 le style de couleurs SmartArt sur « Contour foncé 2 ».

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.Color = Application.SmartArtColors(2) 

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.