ThreeDFormat. Depth-Eigenschaft (Word)ThreeDFormat.Depth property (Word)

Gibt die Tiefe der Extrusion der Form zurück oder legt sie fest.Returns or sets the depth of the shape's extrusion. Wert vom Typ Single mit Lese-/Schreibzugriff.Read/write Single.

SyntaxSyntax

Ausdruck. Tiefeexpression.Depth

Ausdruck Eine Variable, die ein "ThreeDFormat"-Objekt darstellt.expression A variable that represents a 'ThreeDFormat' object.

BemerkungenRemarks

Die Depth -Eigenschaft kann ein Wert von-600 bis 9600 sein (positive Werte erzeugen eine Extrusion, deren Vorderseite die ursprüngliche Form ist; negative Werte erzeugen eine Extrusion, deren Rückseite die ursprüngliche Form ist).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).

BeispielExample

In diesem Beispiel wird dem aktiven Dokument ein Oval hinzugefügt und dann angegeben, dass das Oval auf eine Tiefe von 50 Punkt extrudiert wird und die Projektion Violett sein soll.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

Siehe auchSee also

ThreeDFormat-ObjektThreeDFormat Object

Support und FeedbackSupport and feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation?Have questions or feedback about Office VBA or this documentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.