Returns a ThreeDFormat object that contains 3-D - effect formatting properties for the specified shape. Read-only.
Syntax
expression.ThreeD
expression A variable that represents a ShapeRange object.
Return Value
ThreeDFormat
Example
This example sets the depth, extrusion color, extrusion direction, and lighting direction for the 3-D effects applied to shape one on myDocument.
| Visual Basic for Applications
|
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
|
See also: