Excel VBA教程:PresetThreeDFormat属性

返回预置的延伸格式。每个预置的延伸格式包含延伸图形的各种属性的预置值。如果延伸图形的格式是自定义格式而不是预置格式,则本属性将返回 msoPresetThreeDFormatMixed。本属性的值相应于单击“绘图”工具栏上的“三维效果样式”工具时所出现的选项(按从左至右和从上至下的顺序编号)。MsoPresetThreeDFormat 类型,只读。

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

expression.PresetThreeDFormat

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

说明

本属性为只读属性。可用SetThreeDFormat方法设置预置的延伸格式。

示例

如果myDocument 中的第一个图形原来是自定义的延伸格式,则本示例就将该图形设置为第十二个三维样式。


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

上页:Excel VBA教程:PresetTexture属性 下页:Excel VBA教程:Previous属性

Excel VBA教程:PresetThreeDFormat属性

Excel VBA教程:Previous属性 Excel VBA教程:PreviousSelections属性
Excel VBA教程:PrintArea属性 Excel VBA教程:PrintComments属性
Excel VBA教程:PrintErrors属性 Excel VBA教程:PrintGridlines属性
Excel VBA教程:PrintHeadings属性 Excel VBA教程:PrintNotes属性
Excel VBA教程:PrintObject属性 Excel VBA教程:PrintQuality属性
Excel VBA教程:PrintSettings属性 Excel VBA教程:PrintTitleColumns属性
Excel VBA教程:PrintTitleRows属性 Excel VBA教程:PrintTitles属性
Excel VBA教程:ProductCode属性 Excel VBA教程:ProgId属性
Excel VBA教程:PromptForSummaryInfo属性 Excel VBA教程:PromptString属性
Excel VBA教程:Properties属性 Excel VBA教程:PropertyOrder属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号