Share via


PresetMaterial Property

MsoPresetMaterial

MsoPresetMaterial can be one of these MsoPresetMaterial constants.
msoMaterialMatte
msoMaterialMetal
msoMaterialPlastic
msoMaterialWireFrame
msoPresetMaterialMixed

expression.PresetMaterial

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

Example

This example specifies that the extrusion surface for shape one in myDocument be wire frame.

Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(1).ThreeD
    .Visible = True
    .PresetMaterial = msoMaterialWireFrame
End With

Applies to | ThreeDFormat Object