返回或设置与指定对象关联的应用旧版配色方案中的颜色。
为向后兼容而提供。 请改为将 [ObjectThemeColor]
用于 Office 2007 及更高版本。 读/写。
语法
expression。 SchemeColor
表达 一个代表 ColorFormat 对象的变量。
返回值
PpColorSchemeIndex
备注
SchemeColor 属性的值可以是其中一个 读 常量。
| ppAccent1 |
|---|
| ppAccent2 |
| ppAccent3 |
| ppBackground |
| ppFill |
| ppForeground |
| ppNotSchemeColor |
| ppSchemeColorMixed |
| ppShadow |
| ppTitle |
VBA示例
本示例切换活动演示文稿中第一张幻灯片的两种背景色，一种是明确的红-绿-蓝值所定义的颜色，另一种是配色方案的背景色。
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