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