返回延伸图形所延伸的部分(延伸图形的前面)的延伸方向。MsoPresetExtrusionDirection 类型,只读。
| MsoPresetExtrusionDirection 可为以下 MsoPresetExtrusionDirection 常量之一。 |
| msoExtrusionTop |
| msoExtrusionTopRight |
| msoExtrusionBottom |
| msoExtrusionBottomLeft |
| msoExtrusionBottomRight |
| msoExtrusionLeft |
| msoExtrusionNone |
| msoExtrusionRight |
| msoExtrusionTopLeft |
| msoPresetExtrusionDirectionMixed |
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