ThreeD 属性

返回 ThreeDFormat 对象，该对象包含指定形状的三维效果格式属性。只读。

示例

本例设置应用于 myDocument 中第一个形状的三维效果：深度、延伸色、延伸方向以及照明方向。

Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(1).ThreeD
    .Visible = True
    .Depth = 50
    'RGB value for purple
    .ExtrusionColor.RGB = RGB(255, 100, 255)
    .SetExtrusionDirection msoExtrusionTop
    .PresetLightingDirection = msoLightingLeft
End With