This documentation is archived and is not being maintained.

ThreeD Property [Excel 2003 VBA Language Reference]

Office 2003

Returns a ThreeDFormat object that contains 3-D – effect formatting properties for the specified shape. Read-only.


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 = Worksheets(1)
With myDocument.Shapes(1).ThreeD
    .Visible = True
    .Depth = 50
    .ExtrusionColor.RGB = RGB(255, 100, 255)
    ' RGB value for purple
    .SetExtrusionDirection msoExtrusionTop
    .PresetLightingDirection = msoLightingLeft
End With