Bonjour a tous,
Comme le dit le titre, je souhaite imbriquer un OR et un AND dans une fonction IF avec VBA, mais j'ai une erreur Next sans For et je ne trouve pas pourquoi ...
Voici mon code :
Sub controle_de_depassement_des_dates()
'Permet de contrôler si certaines dates sont dépassées, les mettres en couleurs sur le tableur et envoyer un message d'erreur
Dim derlgn As Integer
derlgn = ThisWorkbook.Sheets("Feuille de mission").Cells(Rows.Count, 1).End(xlUp).Row
'Mise en forme conditionnelle
For i = 21 To derlgn Step 1
If ((Cells(i, 6) < Range("C13")) And ((L21 = "") Or (L21 = "En attente de prévalidation"))) Then
Cells(i, 6).Font.Color = RGB(255, 0, 0)
Else
Cells(i, 6).Font.Color = RGB(0, 0, 0)
Next i
End Sub
J'attend vos réponses avec impatience !