ColorFormat object (PowerPoint)
Represents the color of a one-color object, the foreground or background color of an object with a gradient or patterned fill, or the pointer color. You can set colors to an explicit red-green-blue value (by using the RGB property) or to a color in the theme (by using the [ObjectThemeColor]) or the legacy pre-Office 2007 color scheme (by using the SchemeColor property).
Remarks
Use one of the properties listed in the following table to return a ColorFormat object.
| Use this property | With this object | To return a ColorFormat object that represents this |
|---|---|---|
| DimColor | AnimationSettings | Color used for dimmed objects |
| BackColor | FillFormat | Background fill color (used in a shaded or patterned fill) |
| ForeColor | FillFormat | Foreground fill color (the fill color for a solid fill) |
| Color | Font | Bullet or character color |
| BackColor | LineFormat | Background line color (used in a patterned line) |
| ForeColor | LineFormat | Foreground line color (or just the line color for a solid line) |
| ForeColor | ShadowFormat | Shadow color |
| PointerColor | SlideShowSettings | Default pointer color for a presentation |
| PointerColor | SlideShowView | Temporary pointer color for a view of a slide show |
| ExtrusionColor | ThreeDFormat | Color of the sides of an extruded object |
Example
Use the SchemeColor property to set the color of a slide element to one of the colors in the standard color scheme. The following example sets the text color for shape one on slide two in the active presentation to the standard color-scheme title color.
ActivePresentation.Slides(2).Shapes(1).TextFrame.TextRange.Font.Color.SchemeColor = ppTitle
Use the RGB property to set a color to an explicit red-green-blue value. The following example adds a rectangle to myDocument and then sets the foreground color, background color, and gradient for the rectangle's fill.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes.AddShape(msoShapeRectangle, 90, 90, 90, 50).Fill
.ForeColor.RGB = RGB(128, 0, 0)
.BackColor.RGB = RGB(170, 170, 170)
.TwoColorGradient msoGradientHorizontal, 1
End With
See also
PowerPoint Object Model Reference
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.