Créer un bouton qui change de couleur (noir et blanc) en cliquant dessus

Bonjour,

J'ai recherché sur le forum des sujets similaires et j'en ai trouver mais malheureusement je n'en ai pas trouvé qui correspond à ma recherche.

Donc en effet, j'aimerai créer un bouton où lorsqu'on clic dessus il se met en noir et si on re-clic dessus il se met en blanc et ainsi de suite.

J'avais trouvé ceci pour pouvoir le mettre en noir :

Private Sub CommandButton1_Click()
CommandButton1.BackColor = 0
End Sub

Mais voilà, après je ne sais pas comment on "formalise" pour le remettre en blanc et ainsi de suite.

En vous remerciant de vos réponses

Cécilou

Bonjour,

Teste comme ceci

Private Sub CommandButton1_Click()
  If CommandButton1.BackColor = rgbWhite Then
    CommandButton1.BackColor = rgbBlack
  Else
    CommandButton1.BackColor = rgbWhite
  End If
End Sub

Bonjour,

Avec des petites conditions ?

Private Sub CommandButton1_Click()
    if CommandButton1.BackColor = 0 then 
        CommandButton1.BackColor = 3
    else : CommandButton1.BackColor = 3 : end if
End Sub

J'ai mis 3 comme back color, mais j'ignore totalement ce qui correspond à telle ou telle couleur !

edit : Hello M12 ! Plus précis, plus efficace, bravo ;)

Merci à vous deux de m'avoir répondu et ça marche trop bien.

J'ai même réussi à en faire plusieurs c'est trop bien !

(C'est la première fois que je fais du VBA, et quand ça marche c'est trop cool ...)

Aïe, attention !

C'est super addictif. Quand on tombe dedans, c'est dur d'arrêter ensuite !

Nul doute qu'on se croisera à nouveau alors ;)

En attendant,

@ bientôt.