PresetExtrusionDirection 属性

       

返回延伸图形所延伸的部分(延伸图形的前面)的延伸方向。MsoPresetExtrusionDirection 类型,只读。

expression.PresetExtrusionDirection

expression   必需。该表达式返回“应用于”列表中的对象之一。

说明

本属性为只读属性。可用 SetExtrusionDirection 方法设置属性。

示例

本示例将 myDocument 中向左上延伸的图形改为向右下延伸。

Set myDocument = Worksheets(1)
For Each s In myDocument.Shapes
    With s.ThreeD
        If .PresetExtrusionDirection = msoExtrusionTopLeft Then
            .SetExtrusionDirection msoExtrusionBottomRight
        End If
    End With
Next