Farbmenü
29.01.2003 21:26:11
BerndL
Wenn man in Excel die Pfeilchen neben den Schaltern "Füllfarbe" oder "Schriftfarbe" betätigt, dann öffnet sich ein Fenster mit 40 Farbfeldern.
Genau so ein Fenster will ich in VBA einbauen (aus VBA ansteuern) und es soll mir den Farbwert bei Klick zurückliefern.
Einen passenden "application.dialog" hab' ich nicht gefunden.
Mit:
Sub farbe()
Dim x As Long
x = Application.Dialogs(xlDialogPatterns).Show
End Sub
wird mir z.B. der Zellhintergrund sofort eingefärbt und der Rückgabewert ist vom Typ "boolean".
Wer kann mir da 'nen kleinen Tip geben?