Re,
Pour la couleur, une simple MFC devrait suffire ....
Sinon, un truc du genre :
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Select Case ActiveCell.Value
Case ""
ActiveCell.Value = "OUI"
ActiveCell.Interior.Color = 13434777 'bleu clair
Case "OUI"
ActiveCell.Value = "NON"
ActiveCell.Interior.Color = 10092543 'jaune clair
Case "NON"
ActiveCell.Value = ""
ActiveCell.Interior.Color = 65535 'jaune standart
End Select
Cancel = True
End Sub
Il s'agit bien sur d'un exemple, reste à voir comment modifier ta macro en conséquence,
Cordialement,