Excel VBA教程:ExtrusionColorType属性

返回或设置一个值,该值指示延伸颜色是否基于延伸图形的填充(延伸前表面)并在图形填充更改时自动进行更改,或延伸颜色是否独立于图形填充。MsoExtrusionColorType 类型,可读写。

MsoExtrusionColorType 可为以下 MsoExtrusionColorType 常量之一。
msoExtrusionColorAutomatic 基于图形填充的延伸颜色。
msoExtrusionColorTypeMixed
msoExtrusionColorCustom 独立于图形填充的延伸颜色。

expression.ExtrusionColorType

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

示例

如果myDocument 上第一个图形具有自动的延伸颜色,本示例就将该延伸颜色设置为自定义的黄色。


Set myDocument = Worksheets(1)
With myDocument.Shapes(1).ThreeD
    If .ExtrusionColorType = msoExtrusionColorAutomatic Then
        .ExtrusionColor.RGB = RGB(240, 235, 16)
    End If
End With

上页:Excel VBA教程:ExtrusionColor属性 下页:Excel VBA教程:FeatureInstall属性

Excel VBA教程:ExtrusionColorType属性

Excel VBA教程:FeatureInstall属性 Excel VBA教程:FetchedRowOverflow属性
Excel VBA教程:FieldNames属性 Excel VBA教程:FileConverters属性
Excel VBA教程:FileDialog属性 Excel VBA教程:获取有关 Macintosh 关键字的“帮助”
Excel VBA教程:FileFormat属性 Excel VBA教程:FileName属性
Excel VBA教程:FileSearch属性 Excel VBA教程:Fill属性
Excel VBA教程:FillAdjacentFormulas属性 Excel VBA教程:FilterMode属性
Excel VBA教程:Filters属性 Excel VBA教程:FindFormat属性
Excel VBA教程:FirstChild属性 Excel VBA教程:FirstPageNumber属性
Excel VBA教程:FirstSliceAngle属性 Excel VBA教程:FitToPagesTall属性
Excel VBA教程:FitToPagesWide属性 Excel VBA教程:FixedDecimal属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号