设置延伸经过的路径偏离延伸形状的方向。
expression.SetExtrusionDirection(PresetExtrusionDirection)
expression 必选。该表达式返回一个 ThreeDFormat 对象。
PresetExtrusionDirection 必选。MsoPresetExtrusionDirection 类型。指定延伸方向。
MsoPresetExtrusionDirection 可以是下列 MsoPresetExtrusionDirection 类型常数之一。 |
msoExtrusionBottom |
msoExtrusionBottomLeft |
msoExtrusionBottomRight |
msoExtrusionLeft |
msoExtrusionNone |
msoExtrusionRight |
msoExtrusionTop |
msoExtrusionTopLeft |
msoExtrusionTopRight |
msoPresetExtrusionDirectionMixed |
该方法将 PresetExtrusionDirection 属性设为由 PresetExtrusionDirection 参数指定的方向。
本示例指定 myDocument
中第一个形状向该形状的顶部延伸,而且延伸的光线由左侧照入。
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(1).ThreeD
.Visible = True
.SetExtrusionDirection msoExtrusionTop
.PresetLightingDirection = msoLightingLeft
End With