ShapeRange.ThreeD Property
Returns a ThreeDFormat object that contains 3-D – effect formatting properties for the specified shape. Read-only.
Namespace: Microsoft.Office.Interop.PowerPoint
Assembly: Microsoft.Office.Interop.PowerPoint (in Microsoft.Office.Interop.PowerPoint.dll)
Syntax
'Declaration
ReadOnly Property ThreeD As ThreeDFormat
Get
'Usage
Dim instance As ShapeRange
Dim value As ThreeDFormat
value = instance.ThreeD
ThreeDFormat ThreeD { get; }
Property Value
Type: Microsoft.Office.Interop.PowerPoint.ThreeDFormat
ThreeDFormat
Examples
This example sets the depth, extrusion color, extrusion direction, and lighting direction for the 3-D 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