title | keywords | f1_keywords | api_name | ms.assetid | ms.date | ms.localizationpriority | ||
---|---|---|---|---|---|---|---|---|
ShapeRange.ThreeD property (PowerPoint) |
vbapp10.chm548036 |
|
|
e0e2f72d-639b-86fd-2191-f537ddcd45ad |
06/08/2017 |
medium |
Returns a ThreeDFormat object that contains 3D - effect formatting properties for the specified shape. Read-only.
expression.ThreeD
expression A variable that represents a ShapeRange object.
ThreeDFormat
This example sets the depth, extrusion color, extrusion direction, and lighting direction for the 3D effects applied to shape one on myDocument.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(1).ThreeD
.Visible = True
.Depth = 50
'RGB value for purple
.ExtrusionColor.RGB = RGB(255, 100, 255)
.SetExtrusionDirection msoExtrusionTop
.PresetLightingDirection = msoLightingLeft
End With
[!includeSupport and feedback]