PresetExtrusionDirection 属性

返回延伸路径从延伸形状（延伸的正面）中带走的方向。只读。MsoPresetExtrusionDirection 类型。

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

说明

该属性为只读。若要设置该属性的值，请使用 SetExtrusionDirection 方法。

示例

本示例将 myDocument 中每个朝向延伸正面左上角的延伸更改为朝向右下角的延伸。

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