PresetExtrusionDirection Property
Returns the direction taken by the extrusion's sweep path leading away from the extruded shape (the front face of the extrusion). Read/write MsoPresetExtrusionDirection.
| MsoPresetExtrusionDirection can be one of these MsoPresetExtrusionDirection constants. |
| msoExtrusionBottom |
| msoExtrusionBottomLeft |
| msoExtrusionBottomRight |
| msoExtrusionLeft |
| msoExtrusionNone |
| msoExtrusionRight |
| msoExtrusionTop |
| msoExtrusionTopLeft |
| msoExtrusionTopRight |
| msoPresetExtrusionDirectionMixed |
expression.PresetExtrusionDirection
expression Required. An expression that returns a ThreeDFormat object.
Remarks
This property is read-only. To set the value of this property, use the SetExtrusionDirection method.
Example
This example changes each extrusion on myDocument that extends toward the upper-left corner of the extrusion's front face to an extrusion that extends toward the lower-right corner of the front face.
Set myDocument = ActiveDocument
For Each s In myDocument.Shapes
With s.ThreeD
If .PresetExtrusionDirection = msoExtrusionTopLeft Then
.SetExtrusionDirection msoExtrusionBottomRight
End If
End With
Next