Cellule colorée

Résolu/Fermé
Signaler
-
 mic6259 -
Bonjour
Est-il possible de colorée une cellule après avoir cliquer dessus et qu'elle reprend la couleur d origine après.
Merci

3 réponses

Messages postés
34249
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
6 décembre 2021
3 865
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 ?

Jaune par exemple mais dans une feuille definie, par exemple feuil2.
Messages postés
17713
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
6 décembre 2021
4 861
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.
Messages postés
2231
Date d'inscription
lundi 6 mai 2013
Statut
Membre
Dernière intervention
21 novembre 2021
333
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
Merci beaucoup c'est exactement ce que je voulais
Bonne journée