Notes
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Cette propriété renvoie ou définit la profondeur d'extrusion de la forme. En lecture/écriture unique.
Syntaxe
expression. Profondeur
Expression Variable qui représente un objet « ThreeDFormat ».
Remarques
La propriété Depth peut être une valeur comprise entre - 600 et 9 600 (les valeurs positives créent une extrusion dont la face avant est la forme d'origine ; les valeurs négatives créent une extrusion dont la face arrière est la forme d'origine).
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
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.