ThreeDFormat.PresetMaterial Property (Publisher)

Returns or sets an MsoPresetMaterial constant that represents the extrusion surface material. Read/write.

Syntax

expression. PresetMaterial

expression A variable that represents a ThreeDFormat object.

Return Value

MsoPresetMaterial

Remarks

The PresetMaterial property value can be one of the ** MsoPresetMaterial** constants declared in the Microsoft Office type library.

Example

This example specifies that the extrusion surface for shape one in the active publication be a wireframe. For this example to work, the specified shape must be a 3-D shape.

Sub SetExtrusionMaterial() 
 With ActiveDocument.Pages(1).Shapes(1).ThreeD 
 .Visible = True 
 .PresetMaterial = msoMaterialWireFrame 
 End With 
End Sub