Word VBA教程:PresetThreeDFormat属性

返回预设延伸格式。每种延伸部分的预设格式都包含一组延伸部分各属性的预设值。如果延伸没用预设格式而用了自定义格式,则此属性返回 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方法设置延伸部分的预设格式。

VBA示例

如果myDocument 中图形 1 原来是自定义的延伸格式,本示例则将其设置为第 12 种“三维样式”。


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

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号