返回预置的延伸格式。每个预置的延伸格式包含延伸图形的各种属性的预置值。如果延伸图形的格式是自定义格式而不是预置格式，则本属性将返回 msoPresetThreeDFormatMixed。本属性的值相应于单击“绘图”工具栏上的“三维效果样式”工具时所出现的选项（按从左至右和从上至下的顺序编号）。MsoPresetThreeDFormat 类型，只读。
| MsoPresetThreeDFormat 可为以下 MsoPresetThreeDFormat 常量之一。 |
| msoThreeD1 |
| msoThreeD11 |
| msoThreeD13 |
| msoThreeD15 |
| msoThreeD17 |
| msoThreeD19 |
| msoThreeD20 |
| msoThreeD4 |
| msoThreeD6 |
| msoThreeD8 |
| msoPresetThreeDFormatMixed |
| msoThreeD10 |
| msoThreeD12 |
| msoThreeD14 |
| msoThreeD16 |
| msoThreeD18 |
| msoThreeD2 |
| msoThreeD3 |
| msoThreeD5 |
| msoThreeD7 |
| msoThreeD9 |
expression.PresetThreeDFormat
expression 必需。该表达式返回“应用于”列表中的对象之一。
本属性为只读属性。可用 SetThreeDFormat 方法设置预置的延伸格式。
如果 myDocument 中的第一个图形原来是自定义的延伸格式，则本示例就将该图形设置为第十二个三维样式。
Set myDocument = Worksheets(1)
With myDocument.Shapes(1).ThreeD
If .PresetThreeDFormat = msoPresetThreeDFormatMixed Then
.SetThreeDFormat msoThreeD12
End If
End With