| Name | Type | Description |
|---|---|---|
| Name |
String
|
|
| FileName |
String
|
|
| Overwrite |
Boolean
|
Specifies whether to overwrite the default palette. If this parameter is set to True, the new palette replaces the default palette. If it is set to False, the new palette coexists with the default palette. |
Sub Test()
Dim pal As Palette
Set pal = Palettes.CreateFromSelection("Selection Colors", _
Application.UserDataPath & "Palettes\SelectionColors.xml", True)
MsgBox "The selection uses " & pal.ColorCount & " colors"
pal.Close
End Sub