ExtrusionColorType Property
Returns or sets a value that indicates whether the extrusion color is based on the extruded shape’s fill (the front face of the extrusion) and automatically changes when the shape’s fill changes, or whether the extrusion color is independent of the shape’s fill. Read/write MsoExtrusionColorType.
MsoExtrusionColorType can be one of these MsoExtrusionColorType constants. |
msoExtrusionColorAutomatic. Extrusion color based on shape fill. |
msoExtrusionColorTypeMixed |
msoExtrusionColorCustom. Extrusion color independent of shape fill. |
expression.ExtrusionColorType
expression Required. An expression that returns one of the objects in the Applies To list.
Example
If shape one on myDocument
has an automatic extrusion
color, this example gives the extrusion a custom yellow color.
Set myDocument = Worksheets(1)
With myDocument.Shapes(1).ThreeD
If .ExtrusionColorType = msoExtrusionColorAutomatic Then
.ExtrusionColor.RGB = RGB(240, 235, 16)
End If
End With