| MsoPresetThreeDFormat can be one of these MsoPresetThreeDFormat constants. |
| msoThreeD1 |
| msoThreeD11 |
| msoThreeD13 |
| msoThreeD15 |
| msoThreeD17 |
| msoThreeD19 |
| msoThreeD20 |
| msoThreeD4 |
| msoThreeD6 |
| msoThreeD8 |
| msoPresetThreeDFormatMixed |
| msoThreeD10 |
| msoThreeD12 |
| msoThreeD14 |
| msoThreeD16 |
| msoThreeD18 |
| msoThreeD2 |
| msoThreeD3 |
| msoThreeD5 |
| msoThreeD7 |
| msoThreeD9 |
expression.PresetThreeDFormat
expression Required. An expression that returns one of the objects in the Applies To list.
Remarks
This property is read-only. To set the preset extrusion format, use the SetThreeDFormat method.
Example
This example sets the extrusion format for shape one on myDocument to 3D Style 12 if the shape initially has a custom extrusion format.
Set myDocument = Worksheets(1)
With myDocument.Shapes(1).ThreeD
If .PresetThreeDFormat = msoPresetThreeDFormatMixed Then
.SetThreeDFormat msoThreeD12
End If
End With