API Documentation > CorelDRAW > 2025-v26 > Application > IVGApplication
Application.ActivePalette property
Gets the reference to the currently active palette
Syntax:
Property Get ActivePalette() As Palette
Remarks:
The ActivePalette property returns a read-only reference to the active palette.
Examples:
The following VBA 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