Edit

Share via

ThreeDFormat.PresetMaterial property (Publisher)

  • Article

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 3D shape.

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

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.