Application.ColorSchemes property (Publisher)
Returns a ColorSchemes collection that represents the color schemes available.
Syntax
expression.ColorSchemes
expression A variable that represents an Application object.
Return value
ColorSchemes
Example
The following example loops through the ColorSchemes collection and displays the name of each color scheme and the RGB value of the color for followed hyperlinks in each scheme.
Dim cscLoop As ColorScheme
Dim cscAll As ColorSchemes
Set cscAll = Application.ColorSchemes
For Each cscLoop In cscAll
With cscLoop
Debug.Print "Color scheme: " & .Name _
& " / Followed hyperlink color: " _
& .Colors(ColorIndex:=pbSchemeColorFollowedHyperlink).RGB
End With
Next cscLoop
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.