PresetThreeDFormat Property
MsoPresetThreeDFormat
MsoPresetThreeDFormat can be one of these MsoPresetThreeDFormat constants. |
msoPresetThreeDFormatMixed The extrusion has a custom format rather than a preset format. |
msoThreeD1 |
msoThreeD2 |
msoThreeD3 |
msoThreeD4 |
msoThreeD5 |
msoThreeD6 |
msoThreeD7 |
msoThreeD8 |
msoThreeD9 |
msoThreeD10 |
msoThreeD11 |
msoThreeD12 |
msoThreeD13 |
msoThreeD14 |
msoThreeD15 |
msoThreeD16 |
msoThreeD17 |
msoThreeD18 |
msoThreeD19 |
msoThreeD20 |
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 = ActivePresentation.Slides(1)
With myDocument.Shapes(1).ThreeD
If .PresetThreeDFormat = msoPresetThreeDFormatMixed Then
.SetThreeDFormat msoThreeD12
End If
End With
Applies to | ThreeDFormat Object