返回预设延伸格式。每种延伸部分的预设格式都包含一组延伸部分各属性的预设值。如果延伸没用预设格式而用了自定义格式,则此属性返回 msoPresetThreeDFormatMixed。MsoPresetThreeDFormat,只读。
| MsoPresetThreeDFormat 可以是下列 MsoPresetThreeDFormat 常量之一: |
| msoPresetThreeDFormatMixed |
| msoThreeD1 |
| msoThreeD10 |
| msoThreeD11 |
| msoThreeD12 |
| msoThreeD13 |
| msoThreeD14 |
| msoThreeD15 |
| msoThreeD16 |
| msoThreeD17 |
| msoThreeD18 |
| msoThreeD19 |
| msoThreeD2 |
| msoThreeD20 |
| msoThreeD3 |
| msoThreeD4 |
| msoThreeD5 |
| msoThreeD6 |
| msoThreeD7 |
| msoThreeD8 |
| msoThreeD9 |
expression.PresetThreeDFormat
expression 必需。该表达式返回一个 ThreeDFormat 对象。
此属性值对应于在“绘图”工具栏上单击“三维效果”按钮时所显示的选项(从左到右,从上到下进行编号)。
可用 SetThreeDFormat 方法设置延伸部分的预设格式。
如果 myDocument 中图形 1 原来是自定义的延伸格式,本示例则将其设置为第 12 种“三维样式”。
Set myDocument = ActiveDocument
With myDocument.Shapes(1).ThreeD
If .PresetThreeDFormat = msoPresetThreeDFormatMixed Then
.SetThreeDFormat msoThreeD12
End If
End With