Share via

ExtrusionColorType Property [Publisher 2003 VBA Language Reference]

  • Article

MsoExtrusionColorType

MsoExtrusionColorType can be one of these MsoExtrusionColorType constants.
msoExtrusionColorAutomatic Extrusion color is based on shape fill.
msoExtrusionColorCustom Extrusion color is independent of shape fill.
msoExtrusionColorTypeMixed Return value only; indicates a combination of the other states in the specified shape range.

expression.ExtrusionColorType

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

Example

If the first shape in the active publication has an automatic extrusion color, this example gives the extrusion a custom yellow color.

With ActiveDocument.Pages(1).Shapes(1).ThreeD
    If .ExtrusionColorType = msoExtrusionColorAutomatic Then
        .ExtrusionColor.RGB = RGB(240, 235, 16)
    End If
End With

Applies to | ThreeDFormat Object