ThreeDFormat. Depth, propriété (Word)ThreeDFormat.Depth property (Word)

Cette propriété renvoie ou définit la profondeur d'extrusion de la forme.Returns or sets the depth of the shape's extrusion. En lecture/écriture unique.Read/write Single.

SyntaxeSyntax

expression. Depth (profondeur )expression.Depth

expression Variable qui représente un objet «ThreeDFormat».expression A variable that represents a 'ThreeDFormat' object.

RemarquesRemarks

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).The Depth property can be a value from - 600 through 9600 (positive values produce an extrusion whose front face is the original shape; negative values produce an extrusion whose back face is the original shape).

ExempleExample

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.This example adds an oval to the active document and then specifies that the oval be extruded to a depth of 50 points and that the extrusion be purple.

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 aussiSee also

Objet ThreeDFormatThreeDFormat Object

Assistance et commentairesSupport and feedback

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ?Have questions or feedback about Office VBA or this 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.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.