全部显示

PresetThreeDFormat 属性

       

返回预设延伸格式。每种延伸部分的预设格式都包含一组延伸部分各属性的预设值。如果延伸没用预设格式而用了自定义格式,则此属性返回 msoPresetThreeDFormatMixedMsoPresetThreeDFormat,只读。

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