XL 2013 Changement de couleur de cellule lors d'un clic

[Antoine85]

Bonjour à tous,

Je souhaiterais changer la couleur de ma cellule ainsi que de mon texte à l'intérieur lorsque je clique dessus. Puis, lorsque je re-clic dessus, la cellule reviens à son état "normal".

Je ne sais pas si il existe une fonction dans les paramètres ou si il faut engager une Macro ..

J'espère avoir été clair dans ma demande.

Cordialement.

 

[Si...]

Re : Changement de couleur de cellule lors d'un clic

re

Mais si, Modeste , on était sur la même voie seulement j’avais rajouté dans l’exemple, le changement de contenu.
Comme toi, je serais partisan, pour éviter tout changement intempestif par clic ou déplacement, de changer d’évènement. La Macro suivante fait intervenir le doubleclic.
En espérant ne pas trouver le « R » dans d’autres cellules que celles souhaitées, elle se simplifierait comme cela

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
  If Target <> "R" Then Exit Sub
  Target.Interior.ColorIndex = IIf(Target.Interior.ColorIndex = 3, 19, 3)
  Target.Font.ColorIndex = IIf(Target.Interior.ColorIndex = 3, 2, 0)
  Target(2, 1).Select
End Sub

Nota le 19 vient de la couleur des cellules des tableaux

 

[Antoine85]

Re : Changement de couleur de cellule lors d'un clic

Merci Si... c'est exactement ce que je souhaitais !

Je vous remercie tous pour le temps et la réflexion accordés

 

[st007]

Re : Changement de couleur de cellule lors d'un clic

Pour information : Target.Interior.Color = RGB(255, 242, 204)