ThreeDFormat.PresetThreeDFormat property (Word)
Returns the preset extrusion format. Read-only MsoPresetThreeDFormat.
Syntax
expression. PresetThreeDFormat
expression Required. A variable that represents a 'ThreeDFormat' object.
Remarks
Each preset extrusion format contains a set of preset values for the various properties of the extrusion. If the extrusion has a custom format rather than a preset format, this property returns msoPresetThreeDFormatMixed.
The values for this property correspond to the options (numbered from left to right, top to bottom) displayed when you click the 3D button on the Drawing toolbar.
Use the SetThreeDFormat method to set the preset extrusion format.
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 = ActiveDocument
With myDocument.Shapes(1).ThreeD
If .PresetThreeDFormat = msoPresetThreeDFormatMixed Then
.SetThreeDFormat msoThreeD12
End If
End With
See also
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.
Feedback
https://aka.ms/ContentUserFeedback.
Coming soon: Throughout 2024 we will be phasing out GitHub Issues as the feedback mechanism for content and replacing it with a new feedback system. For more information see:Submit and view feedback for