ColorPicker: erweiterter FarbPicker
10.11.2018 09:44:59
Dieter(Drummer)
Vor einiger Zeit suchte ich die Möglicheit, die Farberweiterung des FarbPickers, direkt per Code aufzurufen. Es gab keine Lösung für mich.
Jetzt habe ich es heraus gefunden und stelle es hier ein, da evtl. andere so etwas mal brauchen. Code z.B. in Modul1:
Sub ErwFarbe() 'Colordialog: erweiterte Farben zeigen
MsgBox "Zahl in Klammern des Codes, geben die markierte Farbe im ColorPicker an."
Application.Dialogs(xlDialogEditColor).Show (2) '2 steht für weiß
End Sub
Gruß und einen erfreulichen Tag,
Dieter(Drummer)