Question

多个对象 ColorScheme RGBColor

代表一种配色方案。该配色方案是八种颜色的组合，分别用于幻灯片、备注页或讲义中不同的元素，例如标题或背景（请注意，演示文稿中幻灯片、备注页或讲义的配色方案可以单独设置）。每种颜色由一个RGBColor 对象代表。ColorScheme 对象是ColorSchemes 集合的成员。ColorSchemes 集合包含演示文稿中所有的配色方案。

使用 ColorScheme 对象

本节描述如何进行下列操作：

• 从演示文稿的所有配色方案的集合中返回ColorScheme 对象。
• 返回附加到指定幻灯片或母版的ColorScheme 对象。
• 从ColorScheme 对象返回单个幻灯片元素的颜色。

从演示文稿的所有配色方案的集合中返回 ColorScheme 对象

使用ColorSchemes(index) 返回单个ColorScheme 对象，其中index 是幻灯片配色方案索引号。以下示例删除当前演示文稿第二个配色方案。

ActivePresentation.ColorSchemes(2).Delete

返回附加到指定幻灯片或母版的 ColorScheme 对象

设置Slide、SlideRange 或Master 对象的ColorScheme 属性可分别返回一张幻灯片、一组幻灯片、或一个幻灯片母版的配色方案。以下示例创建一个基于当前幻灯片的配色方案，将新配色方案添加到演示文稿的标准配色方案集合中，并将幻灯片母版的配色方案设为新的配色方案。所有基于该母版的幻灯片将具有该配色方案。

Set newScheme = ActiveWindow.View.Slide.ColorScheme
newScheme.Colors(ppTitle).RGB = RGB(0, 150, 250)
Set newStandardScheme = _
 ActivePresentation.ColorSchemes.Add(newScheme)
ActivePresentation.SlideMaster.ColorScheme = newStandardScheme

从 ColorScheme 对象返回单个幻灯片元素的颜色

使用Colors 方法返回RGBColor 对象，该对象代表一个幻灯片元素类型的颜色。可以将一个RGBColor 对象设置为另一个RGBColor 对象，或使用RGB 属性设置或返回RGBColor 对象的显式的红-绿-蓝（RGB）值。以下示例将第一个配色方案的背景色设为红色，并将标题颜色设为第二个配色方案中定义的标题颜色。

With ActivePresentation.ColorSchemes
 .Item(1).Colors(ppBackground).RGB = RGB(255, 0, 0)
 .Item(1).Colors(ppTitle) = .Item(2).Colors(ppTitle)
End With