Application.ActivePalette

Property ActivePalette As Palette

Member of Application

The ActivePalette property returns a reference to the active palette.

The ActivePalette property returns a read-only value.

The following code example displays the name of the default palette, and the number of colors in that palette, in a message box.

Sub PaletteActive() 
 MsgBox "The default color palette is: " & _ 
 ActivePalette.Name & _ 
 "It contains " & ActivePalette.ColorCount & " colors." 
End Sub 

Copyright 2007 Corel Corporation. All rights reserved.