constant that represents the direction taken by the extrusion's sweep path leading away from the extruded shape (the front face of the extrusion). Read-only.
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 one of the objects in the Applies To list.
Remarks
This property is read-only. To set the value of this property, use the SetExtrusionDirection method.
Example
This example changes the extrusion for the first shape on the first page of the active publication if the extrusion extends toward the upper-left corner of the extrusion's front face. For this example to work, the specified shape must be a 3-D shape.
Sub SetExtrusion()
With ActiveDocument.Pages(1).Shapes(1).ThreeD
If .PresetExtrusionDirection = msoExtrusionTopLeft Then
.SetExtrusionDirection msoExtrusionBottomRight
End If
End With
End Sub