PresetThreeDFormat 属性

       

返回预置的延伸格式。每个预置的延伸格式包含延伸图形的各种属性的预置值。如果延伸图形的格式是自定义格式而不是预置格式,则本属性将返回 msoPresetThreeDFormatMixed。本属性的值相应于单击“绘图”工具栏上的“三维效果样式”工具时所出现的选项(按从左至右和从上至下的顺序编号)。MsoPresetThreeDFormat 类型,只读。

expression.PresetThreeDFormat

expression   必需。该表达式返回“应用于”列表中的对象之一。

说明

本属性为只读属性。可用 SetThreeDFormat 方法设置预置的延伸格式。

示例

如果 myDocument 中的第一个图形原来是自定义的延伸格式,则本示例就将该图形设置为第十二个三维样式。

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