Bouton deuxième clic

Bonjour à tous,

savez-vous si il est possible de paramétré pour un bouton, un deuxième clic permettant de réinitialiser la transformation de ma feuille induite par le premier clic?

Merci !!

Bonjour

Oui.

Crdlt

Merci Dan mais peux tu m'en dire plus stp?

Re

Merci Dan mais peux tu m'en dire plus stp?

Moi non à moins que tu expliques mieux ce que tu veux faire ou encore mieux placer un fichier exemple (sans données confidentiellles)

De là on peut avancer

Crdlt

Bonjour Dan et merci pour ton aide,

voilà , dans le fichier ci-joint, j'ai deux bouton (Iinf et I/v inf) ceux-ci me donnent une valeur dans leur tableau respectif en rouge et des valeurs affichées sur le côté droit de chacun des boutons. J'aimerais que quand je clic sur le bouton Iinf, tout le tableau redevienne avec les valeurs en noirs et que les données sur le côté disparaissent. Idem pour le bouton I/v inf.

En gros j'aimerais que mon deuxième clic annule le premier.

Merci

Re

Merci de ton fichier et explications

Une manière simple en modifiant tes codes comme suit

Dim ok1 As Boolean
Dim ok2 As Boolean
Private Sub CommandButton1_Click()

If ok1 = True Then Range("R5:Z13").Font.Color = RGB(0, 0, 0): ok1 = False: Exit Sub
...
ok1 = true
End sub

Puis le deuxième code comme ceci :

Private Sub CommandButton2_Click()
If ok2 = True Then Range("R24:Z32").Font.Color = RGB(0, 0, 0): ok2 = False: Exit Sub
...
ok2 = true
End sub

Si ok, clique sur le v vert à coté du bouton EDITER lors de ta réponse afin de cloturer le fil

Cordialement