ThreeDFormat.Depth-Eigenschaft (Publisher)

Artikel
04/07/2023

Gibt ein, oder legt einen Variant-Wert, der die Tiefe der Extrusion der Form. Lese-/Schreibzugriff.

Syntax

Ausdruck. Tiefe

Ausdruck Eine Variable, die ein ThreeDFormat-Objekt darstellt.

Rückgabewert

Variant

Bemerkungen

Numerische Werte werden in Punkten ausgewertet; Zeichenfolgen können in beliebigen Einheiten enthalten sein, die von Microsoft Publisher unterstützt werden (z. B. "2,5 zoll").

Positive Werte erzeugen eine Extrusion, deren Vorderseite die ursprüngliche Form aufweist; negative Werte erzeugen eine Extrusion, deren Rückseite die ursprüngliche Form ist. Der gültige Bereich beträgt -600 bis 9600 Punkte oder die entsprechende Entfernung in allen anderen Einheiten.

Beispiel

Bei diesem Beispiel werden der aktiven Publikation ein Oval und eine Legende hinzugefügt, und anschließend wird angegeben, dass eine Extrusion auf eine Tiefe von 50 Punkt mit der Farbe Violett auf das Oval angewendet werden soll.

Dim shpNew As Shape 
 
Set shpNew = ActiveDocument.Pages(1).Shapes _ 
 .AddShape(Type:=msoShapeOval, _ 
 Left:=90, Top:=90, Width:=90, Height:=40) 
 
With shpNew.ThreeD 
 .Visible = True 
 .Depth = 50 
 .ExtrusionColor.RGB = RGB(255, 100, 255) 
End With

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.

Freigeben über