Propriété ThreeDFormat.ExtrusionColor (Word)

  • Article

Renvoie un objet ColorFormat qui représente la couleur d'extrusion de la forme. En lecture seule.

Syntaxe

expression. ExtrusionColor

Expression Variable qui représente un objet « ThreeDFormat ».

Exemple

Cet exemple montre comment ajouter un ovale au document actif, puis spécifier pour cet ovale une extrusion colorée en mauve d'une valeur de 50 points.

Dim docActive As Document 
Dim shapeNew As Shape 
 
Set docActive = ActiveDocument 
Set shapeNew = docActive.Shapes.AddShape(msoShapeOval, _ 
 90, 90, 90, 40) 
With shapeNew.ThreeD 
 .Visible = True 
 .Depth = 50 
 ' RGB value for purple 
 .ExtrusionColor.RGB = RGB(255, 100, 255) 
End With

Voir aussi

Objet ThreeDFormat

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.