Comment ouvrir la boîte de dialogue choix des couleurs dans excel ?

sub Macro1()
 a = Application.Dialogs(xlDialogEditColor).Show(1, 0, 0, 0)
 end sub

Attention si tu veux récupérer la valeur choisie pour l'utiliser c'est plus compliqué ! (voir la question récupérer la valeur d'une couleur)