Presentation.ExtraColors Property (PowerPoint)
Returns an ExtraColors object that represents the extra colors available in the specified presentation. Read-only.
Syntax
expression .ExtraColors
expression A variable that represents an Presentation object.
Return Value
ExtraColors
Example
The following example adds a rectangle to slide one in the active presentation and sets its fill foreground color to the first extra color. If there hasn't been at least one extra color defined for the presentation, this example will fail.
With ActivePresentation
Set rect = .Slides(1).Shapes _
.AddShape(msoShapeRectangle, 50, 50, 100, 200)
rect.Fill.ForeColor.RGB = .ExtraColors(1)
End With