ThreeD 属性

       

该属性返回一个 ThreeDFormat 对象,该对象包含指定图形的三维效果格式属性。只读。

示例

本示例设置应用于 myDocument 上图形 1 的 3-D 效果的深度、延伸颜色、延伸方向和照明方向。

Set myDocument = ActiveDocument
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