Word VBA教程:SetThreeDFormat方法

设置延伸部分的预设格式。每种延伸部分的预设格式都包含一组延伸部分各属性的预设值。

expression.SetThreeDFormat(PresetThreeDFormat)

expression   必需。返回 ThreeDFormat对象的表达式。

 PresetThreeDFormat   必需,MsoPresetThreeDFormat。 指明延伸部分的预设格式,对应于在“绘图”工具栏单击“三维效果”按钮所显示的选项(从左向右,从上至下进行编号)。

MsoPresetThreeDFormat 可以设置为以下 MsoPresetThreeDFormat 常量。请注意:如将此参数指定为 msoPresetThreeDFormatMixed,将导致出错。
msoThreeD1
msoThreeD11
msoThreeD13
msoThreeD15
msoThreeD17
msoThreeD19
msoThreeD20
msoThreeD4
msoThreeD6
msoThreeD8
msoPresetThreeDFormatMixed
msoThreeD10
msoThreeD12
msoThreeD14
msoThreeD16
msoThreeD18
msoThreeD2
msoThreeD3
msoThreeD5
msoThreeD7
msoThreeD9

说明

此方法将PresetThreeDFormat属性设置为由 PresetThreeDFormat参数指定的格式。

VBA示例

本示例将一个椭圆添至活动文档中,然后将其延伸部分的格式设置为第 12 种三维样式。


With ActiveDocument.Shapes.AddShape(msoShapeOval, _
        30, 30, 50, 25).ThreeD
    .Visible = True
    .SetThreeDFormat msoThreeD12
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号