Bouton qui change couleur + cellule qui change couleur
Bonjour
j'ai un bouton qui a une macro et qui change de couleur quand je click dessus et qui reprends sa couleur origine quand on reclique dessus
le code :
Private Sub CommandButton1_Click()
If CommandButton1.BackColor = &HFF00& Then
CommandButton1.BackColor = &HC0C0C0
Else
CommandButton1.BackColor = &HFF00&
End If
tour2 ( ma macro )
End Sub
ma question est :
peut ton rajouter a ce code , une commande pour qu'il change la couleur d'une cellule designe en meme temp que le bouton
merci pour votre aide
Bonjour,
à tester,
Private Sub CommandButton1_Click()
If CommandButton1.BackColor = &HFF00& Then
CommandButton1.BackColor = &HC0C0C0
Range("G1").Interior.Color = &HC0C0C0
Else
CommandButton1.BackColor = &HFF00&
Range("G1").Interior.Color = &HFF00&
End If
End Subimpeccable mais il manque le retour
c'est a dire quand je reclique sur le bouton , pour qu il reprenne sa couleur origine il faudrait que la cellule aussireviennet a sa couleur origine
excuse ca marche nikel car je n'avais pas changer les 2 g1 , donc ca marchait pas
maintenenant impeable
meri pour tout
Bonjour
Dans ce que tu fais pour le bouton, il ne revient pas à sa couleur d'origine il passe du gris foncé au vert,
la réponse que l'on t'a donné fait exactement la même chose pour la cellule !!
Sinon, récupère la couleur d'origine pour pouvoir la remettre
A+
Désolée nos posts se sont croisés
Bye