Re-
Ravi que la solution te convienne
Si I3 ou J3 = "OUI" ne pas recevoir une alerte. En PJ le fichier
Remplace le code que tu as par celui ci-dessous :
Private Sub Worksheet_change(ByVal target As Range)
Dim c, p As Range
Set p = Range("H3:H" & Range("H" & Rows.Count).End(xlUp).Row)
For Each c In p
If c.Value < Date And (Cells(c.Row, 9) <> "OUI" Or Cells(c.Row, 10) <> "OUI") Then MsgBox "La ligne " & c.Row & " présente une date inférieur à la date du jour", vbExclamation, "Date dépassée"
Next c
End Sub
A dispo!