Excel.ShapeRange.ThreeD.md

title	keywords	f1_keywords	api_name	ms.assetid	ms.date	ms.localizationpriority
ShapeRange.ThreeD property (Excel)	vbaxl10.chm640116	vbaxl10.chm640116	Excel.ShapeRange.ThreeD	0b4ab4b8-841b-eea6-67a4-effe144d19fe	05/14/2019	medium

ShapeRange.ThreeD property (Excel)

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

Syntax

expression.ThreeD

expression A variable that represents a ShapeRange object.

Example

This example sets the depth, extrusion color, extrusion direction, and lighting direction for the 3D 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

[!includeSupport and feedback]