设置延伸部分的预设格式。每种延伸部分的预设格式都包含一组延伸部分各属性的预设值。
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 参数指定的格式。
本示例将一个椭圆添至活动文档中,然后将其延伸部分的格式设置为第 12 种三维样式。
With ActiveDocument.Shapes.AddShape(msoShapeOval, _
30, 30, 50, 25).ThreeD
.Visible = True
.SetThreeDFormat msoThreeD12
End With