Bien le bonjour,
Voici deux option.
Première option :
Insérer ce code dans la feuille concernée, puis renommer la "Feuil2" = "Copie".
Ensuite insérer TON TABLEAU, puis enregistrer.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Sheets("Copie").Range(Target.Address) <> Target Then
Target.Interior.ColorIndex = 6
Else
Target.Interior.ColorIndex = xlNone
End If
End Sub
Deuxième option :
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Interior.ColorIndex = 36 Then
Target.Interior.ColorIndex = xlNone
Else
Target.Interior.ColorIndex = 36
End If
Cancel = True
End Sub
Insérer aussi le code dans la feuille concernée.
Double clic sur une cellule et elle sera colorée.
j'espère que cela pourra t'aider.
Cordialement,
Mugiwaraa