Cellule colorée

Bonjour,
Ta question manque de précisions....

Changer la couleur quand on clic dessus .. oui.
Mais ... quelle couleur ? En fonction de quoi ? N'importe quelle cellule ?

Et puis... "reprend la couleur d origine après. " .. après quoi ?
Au bout de combien de temps ou après quelle action ou condition ?

Bonjour,

Rapidement ce genre de code à placer dans les propriétés de ta feuille

clic droit sur l'onglet de ta feuille/Visualiser le code et coller ce code

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
Target.Interior.ColorIndex = 3
End Sub 

A+
Mike-31

EDIT : Ajout des balises de code (la coloration syntaxique).
Explications disponibles ici :
https://codes-sources.commentcamarche.net/faq/10686-le-nouveau-codes-sources-comment-ca-marche#balises-code

Merci d'y penser dans tes prochains messages.
.

Une période d'échec est un moment rêvé pour semer les graines du savoir.

Bonjour
A peu près la même procédure mais en restituant les couleurs d'origine de la précédente sélection.

Sub Worksheet_SelectionChange(ByVal Target As Range)
    Static SelectionPrecedente As String, CouleurPrecedente As Long
    If Not SelectionPrecedente = "" Then Range(SelectionPrecedente).Interior.ColorIndex = CouleurPrecedente
    SelectionPrecedente = Target.Address
    CouleurPrecedente = Target.Interior.ColorIndex
    Target.Interior.ColorIndex = 41 'bleu
End Sub