Colorier cellule 1 clic

[asdf2]

Bonjour a tous, je cherche à colorier 1 cellule avec 1 seul clic svp merci

 

[Pierrot93]

Re : Colorier cellule 1 clic

Bonjour asdf

regarde le code ci-dessous, procédure événementielle à placer dans le module de la feuille concernée :

Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Target.Interior.ColorIndex = IIf(Target.Interior.ColorIndex = xlNone, 3, xlNone)
End Sub

bon après midi
@+

Edition : se déclenche à la sélection d'une nouvelle cellule.

 

[asdf2]

Re : Colorier cellule 1 clic

J'ai fait copier coller dans virtual basic editor et sa change pas si tu as la possibilitée de m'envoyer une feuille excel avec le programe fait sa serait super sympa stp je te remercie par avance, je peut te donner mon mail

 

[RENAUDER]

Re : Colorier cellule 1 clic

Bonjour,
Comme l'écrit Pierrot, le code doit être dans la feuille et non pas dans un module.
C'est une procédure événementielle.
Clic droit sur l'onglet de la feuille et Visualiser le code

 

[asdf2]

Re : Colorier cellule 1 clic

j'ai fait clic droit sur l'onglet et visualiser le code mais j arrive sur la même page ou je dois faire le copier coller et sa marche toujours pas

 

[asdf2]

Re : Colorier cellule 1 clic

a sa y'est sa marche comme par miracle sa change de couleur en 1 clic merci