ThreeDFormat 对象

         
Shapes (Shape)
ThreeDFormat
ColorFormat

代表形状的三维格式。

使用 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 对象的大多数属性和方法将失败。