Excel VBA教程:SetThreeDFormat方法

设置预置的延伸格式。每个预置的延伸格式包含延伸图形的各种属性的预置值。

expression.SetThreeDFormat(PresetThreeDFormat)

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

PresetThreeDFormat  MsoPresetThreeDFormat 类型,必需。指定预置的延伸格式,该格式相应于单击“绘图”工具栏上的“三维效果样式”工具时所出现的选项(按从左至右和从上至下的顺序编号)。

MsoPresetThreeDFormat 可为以下 MsoPresetThreeDFormat 常量之一。
msoPresetThreeDFormatMixed
msoThreeD1
msoThreeD10
msoThreeD11
msoThreeD12
msoThreeD13
msoThreeD14
msoThreeD15
msoThreeD16
msoThreeD17
msoThreeD18
msoThreeD19
msoThreeD2
msoThreeD20
msoThreeD3
msoThreeD4
msoThreeD5
msoThreeD6
msoThreeD7
msoThreeD8
msoThreeD9

说明

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

Excel VBA教程:SetThreeDFormat方法·示例

本示例向myDocument 中添加椭圆,并将该椭圆的延伸格式设置为第十二个三维样式。


Set myDocument = Worksheets(1)
With myDocument.Shapes.AddShape(msoShapeOval, _
        30, 30, 50, 25).ThreeD
    .Visible = True
    .SetThreeDFormat msoThreeD12
End With

上页:Excel VBA教程:SetSourceData方法 下页:Excel VBA教程:Show方法

Excel VBA教程:SetThreeDFormat方法

Excel VBA教程:Show方法 Excel VBA教程:ShowAllData方法
Excel VBA教程:ShowDataForm方法 Excel VBA教程:ShowDependents方法
Excel VBA教程:ShowErrors方法 Excel VBA教程:ShowLevels方法
Excel VBA教程:ShowPages方法 Excel VBA教程:ShowPrecedents方法
Excel VBA教程:SmallScroll方法 Excel VBA教程:Solid方法
Excel VBA教程:Sort方法 Excel VBA教程:SortSpecial方法
Excel VBA教程:Speak方法 Excel VBA教程:SpecialCells方法
Excel VBA教程:获取有关 Macintosh 关键字的“帮助” Excel VBA教程:Subtotal方法
Excel VBA教程:SwapNode方法 Excel VBA教程:Table方法
Excel VBA教程:Text方法 Excel VBA教程:TextToColumns方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号