Bonjour
Un fichier est TOUJOURS le bienvenu
Avec une macro
clic droit sur l'onglet concerné
choisir visualiser le code
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Interior.Color = 16777215 Then
ActiveCell.Interior.Color = 65535
Else
ActiveCell.Interior.Color = 16777215
End If
End Sub
A+ François