Question excel

Bonjour,


Voila je fais un tableaux excel avec le macro en exemple mais je voudrais savoir si c'est possible par exemple:

-Cellule C1 remplie avec OUI ma ligne passe en vert mais si je remplis la cellule D2 avec un OUI ma ligne passe en rouge

-Cellule C1 remplie avec NON ma ligne passe en rouge mais si je remplis ma cellule D2 avec un NON ma ligne reste en rouge

Comment faire?

exemple de la macro que j'ai mit Private Sub Worksheet_Change(ByVal sel As Range)
Select Case Cells(sel.Row, "C").Value ' mettre la colonne concernée
Case "NON" 'est en rouge
Rows(sel.Row).Interior.ColorIndex = 3 ' couleur fond
' Rows(sel.Row).Font.ColorIndex = 5 ' couleur caractères
Case "OUI" 'est en vert
Rows(sel.Row).Interior.ColorIndex = 4 ' couleur fond
' Rows(sel.Row).Font.ColorIndex = 1 ' couleur caractères
Case " " 'est en vert
Rows(sel.Row).Interior.ColorIndex = 2 ' couleur fond
' Rows(sel.Row).Font.ColorIndex = 4 ' couleur caractères
Case Else
' Rows(sel.Row).Interior.ColorIndex = xlNone ' couleur fond
Rows(sel.Row).Font.ColorIndex = xlAutomatic ' couleur caractères

End Select

Select Case Cells(sel.Row, "D").Value ' mettre la colonne concernée
Case "NON" 'est en rouge
Rows(sel.Row).Interior.ColorIndex = 3 ' couleur fond
' Rows(sel.Row).Font.ColorIndex = 5 ' couleur caractères
Case "OUI" 'est en vert
Rows(sel.Row).Interior.ColorIndex = 4 ' couleur fond
' Rows(sel.Row).Font.ColorIndex = 1 ' couleur caractères
Case " " 'est en vert
Rows(sel.Row).Interior.ColorIndex = 2 ' couleur fond
' Rows(sel.Row).Font.ColorIndex = 4 ' couleur caractères
Case Else
' Rows(sel.Row).Interior.ColorIndex = xlNone ' couleur fond
Rows(sel.Row).Font.ColorIndex = xlAutomatic ' couleur caractères

End Select
End Sub