title | keywords | f1_keywords | api_name | ms.assetid | ms.date | ms.localizationpriority | ||
---|---|---|---|---|---|---|---|---|
ThreeDFormat.PresetMaterial property (Publisher) |
vbapb10.chm3801351 |
|
|
5f12fb22-f596-0d59-1f02-63ce8d4bd927 |
06/15/2019 |
medium |
Returns or sets an MsoPresetMaterial constant that represents the extrusion surface material. Read/write.
expression.PresetMaterial
expression A variable that represents a ThreeDFormat object.
MsoPresetMaterial
The PresetMaterial property value can be one of the MsoPresetMaterial constants declared in the Microsoft Office type library.
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
[!includeSupport and feedback]