ThreeDFormat 对象
代表形状的三维格式。
使用 ThreeDFormat 对象
使用 ThreeD 属性可返回一个 ThreeDFormat 对象。以下示例向 myDocument 中添加一个椭圆，然后指定该椭圆被挤压 50 磅的深度且延伸为紫色。
Set myDocument = ActivePresentation.Slides(1)
Set myShape = myDocument.Shapes _
.AddShape(msoShapeOval, 90, 90, 90, 40)
With myShape.ThreeD
.Visible = True
.Depth = 50
'RGB value for purple
.ExtrusionColor.RGB = RGB(255, 100, 255)
End With
说明：
不能对某些形状应用三维格式，例如斜截形状或多处间断的路径。对这些形状，ThreeDFormat 对象的大多数属性和方法将失败。