返回预置的延伸格式。每个预置的延伸格式包含延伸图形的各种属性的预置值。如果延伸图形的格式是自定义格式而不是预置格式,则本属性将返回 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