Share via

SetExtrusionDirection Method [Publisher 2003 VBA Language Reference]

  • Article

Sets the direction that the extrusion's sweep path takes away from the extruded shape.

expression.SetExtrusionDirection(PresetExtrusionDirection)

expression Required. An expression that returns one of the objects in the Applies To list.

MsoPresetExtrusionDirection

MsoPresetExtrusionDirection can be one of these MsoPresetExtrusionDirection constants.
msoExtrusionBottom
msoExtrusionBottomLeft
msoExtrusionBottomRight
msoExtrusionLeft
msoExtrusionNone
msoExtrusionRight
msoExtrusionTop
msoExtrusionTopLeft
msoExtrusionTopRight
msoPresetExtrusionDirectionMixed Not used with this method.

Remarks

This method sets the PresetExtrusionDirection property to the direction specified by the PresetExtrusionDirection argument.

Example

This example specifies that the extrusion for the first shape in the active publication extend toward the top of the shape and that the lighting for the extrusion come from the left.

With ActiveDocument.Pages(1).Shapes(1).ThreeD
    .Visible = True
    .SetExtrusionDirection _
        PresetExtrusionDirection:=msoExtrusionTop
    .PresetLightingDirection = msoLightingLeft
End With

Applies to | ThreeDFormat Object