| Shapes (Shape)  ThreeDFormat   ColorFormat | 
该对象代表一个图形的三维格式。
用 ThreeD 属性可以返回一个 ThreeDFormat 对象。下例向活动文档添加一个椭圆,然后指定该椭圆延伸 50 磅,并将延伸部分设为紫色。
Set myShape = ActiveDocument.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 对象的属性和方法都会失败。