ExtrusionColorType Property
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 |
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 = ActivePresentation.Slides(1)
With myDocument.Shapes(1).ThreeD
If .ExtrusionColorType = msoExtrusionColorAutomatic Then
.ExtrusionColor.RGB = RGB(240, 235, 16)
End If
End With
Applies to | ThreeDFormat Object