ColorScheme Object
ColorScheme RGBColor |
Represents a color scheme, which is a set of eight colors used for the different elements of a slide, notes page, or handout, such as the title or background. (Note that the color schemes for slides, notes pages, and handouts in a presentation can be set independently.) Each color is represented by an RGBColor object. The ColorScheme object is a member of the ColorSchemes collection. The ColorSchemes collection contains all the color schemes in a presentation.
Using the ColorScheme Object
This section describes how to do the following:
- Return a ColorScheme object from the collection of all the color schemes in the presentation
- Return the ColorScheme object attached to a specific slide or master
- Return the color of a single slide element from a ColorScheme object
Returning a ColorScheme object from the collection of all the color schemes in the presentation
Use ColorSchemes(index), where index is the color scheme index number, to return a single ColorScheme object. The following example deletes color scheme two from the active presentation.
ActivePresentation.ColorSchemes(2).Delete
Returning the ColorScheme object attached to a specific slide or master
Set the ColorScheme property of a Slide, SlideRange, or Master object to return the color scheme for one slide, a set of slides, or a master, respectively. The following example creates a color scheme based on the current slide, adds the new color scheme to the collection of standard color schemes for the presentation, and sets the color scheme for the slide master to the new color scheme. All new slides based on the master will have this color scheme.
Set newScheme = ActiveWindow.View.Slide.ColorScheme
newScheme.Colors(ppTitle).RGB = RGB(0, 150, 250)
Set newStandardScheme = _
ActivePresentation.ColorSchemes.Add(newScheme)
ActivePresentation.SlideMaster.ColorScheme = newStandardScheme
Returning the color of a single slide element from a ColorScheme object
Use the Colors method to return an RGBColor object that represents the color of a single slide-element type. You can set an RGBColor object to another RGBColor object, or you can use the RGB property to set or return the explicit red-green-blue (RGB) value for an RGBColor object. The following example sets the background color in color scheme one to red and sets the title color to the title color that's defined for color scheme two.
With ActivePresentation.ColorSchemes
.Item(1).Colors(ppBackground).RGB = RGB(255, 0, 0)
.Item(1).Colors(ppTitle) = .Item(2).Colors(ppTitle)
End With