MsoPresetMaterial can be one of these MsoPresetMaterial constants. |
msoMaterialMatte |
msoMaterialMetal |
msoMaterialPlastic |
msoMaterialWireFrame |
msoPresetMaterialMixed |
expression.PresetMaterial
expression Required. An expression that returns a ThreeDFormat object.
Example
This example specifies that the extrusion surface for shape one in myDocument
be wire frame.
Set myDocument = ActiveDocument
With myDocument.Shapes(1).ThreeD
.Visible = True
.PresetMaterial = msoMaterialWireFrame
End With