revenir état initial de la cellule

[Katoch]

Bonjour et bonne année! ,

2 questions :
1)quel code , rajouté à celui-ci, ci dessous , me permettrait de revenir à l'état initial de la cellule , par autre double clic sur cette cellule?
2) quelle code me permettrait de sommer les valeurs des cellules de même couleur ?

fichier joint .


Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True 'annule le mode édition lié au double-clic
'récupère la couleur de la cellule en colonne A et la place dans la cellule double-cliquée
Target.Interior.ColorIndex = Cells(Target.Row, 1).Interior.ColorIndex
End Sub

 

[Pierrot93]

Re : revenir état initial de la cellule

Re,

préférable de rester sur le même fil, plus facile à suivre pour tout le monde y compris pour toi....
https://www.excel-downloads.com/threads/clic-valeur-1.175689/