SchemeColor 属性

       

返回或设置已经应用的配色方案中的颜色,该配色方案与指定对象相关。可读写。PpColorSchemeIndex 类型。

expression.SchemeColor

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

示例

本示例切换当前演示文稿第一张幻灯片的两种背景色,一种是显式的红-绿-蓝值所定义的颜色,另一种是配色方案的背景色。

With ActivePresentation.Slides(1)
    .FollowMasterBackground = False
    With .Background.Fill.ForeColor
        If .Type = msoColorTypeScheme Then
            .RGB = RGB(0, 128, 128)
        Else
            .SchemeColor = ppBackground
        End If
    End With
End With