PowerPoint VBA教程:ExtrusionColorType属性

返回或设置某个值,该值表示延伸色是否基于延伸形状的填充(延伸的正面)、在延伸的填充更改时是否自动更改,或者该延伸色是否独立于形状填充。可读写。MsoExtrusionColorType 类型。

MsoZOrderCmd 可以是下列 MsoZOrderCmd 类型常数之一。
msoExtrusionColorAutomatic 延伸色基于形状填充。
msoExtrusionColorCustom 延伸色独立于形状填充。
msoExtrusionColorTypeMixed

expression.ExtrusionColorType

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

VBA示例

如果myDocument 中第一个形状有自动延伸色,则本示例将将延伸设置为自定义的黄色。


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

上页:PowerPoint VBA教程:ExtrusionColor属性 下页:PowerPoint VBA教程:FarEastLineBreakControl属性

PowerPoint VBA教程:ExtrusionColorType属性

PowerPoint VBA教程:FarEastLineBreakControl属性 PowerPoint VBA教程:FarEastLineBreakLanguage属性
PowerPoint VBA教程:FarEastLineBreakLevel属性 PowerPoint VBA教程:FeatureInstall属性
PowerPoint VBA教程:FileDialog属性 PowerPoint VBA教程:FileName属性
PowerPoint VBA教程:FileSearch属性 PowerPoint VBA教程:Fill属性
PowerPoint VBA教程:FirstChild属性 PowerPoint VBA教程:FirstMargin属性
PowerPoint VBA教程:FirstSlideNumber属性 PowerPoint VBA教程:FitToPage属性
PowerPoint VBA教程:FolderSuffix属性 PowerPoint VBA教程:FollowColors属性
PowerPoint VBA教程:FollowMasterBackground属性 PowerPoint VBA教程:Font属性
PowerPoint VBA教程:FontBold属性 PowerPoint VBA教程:FontItalic属性
PowerPoint VBA教程:FontName属性 PowerPoint VBA教程:Fonts属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号