Share via

ThreeDFormat.PresetThreeDFormat Property

  • Article
Excel Developer Reference

Returns the preset extrusion format. Each preset extrusion format contains a set of preset values for the various properties of the extrusion. Read-only MsoPresetThreeDFormat.

Syntax

expression.PresetThreeDFormat

expression   A variable that represents a ThreeDFormat object.

Remarks

If the extrusion has a custom format rather than a preset format, this property returns msoPresetThreeDFormatMixed.

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

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.

Visual Basic for Applications 
  Set myDocument = Worksheets(1)
With myDocument.Shapes(1).ThreeD
    If .PresetThreeDFormat = msoPresetThreeDFormatMixed Then
        .SetThreeDFormat msoThreeD12
    End If
End With

See Also