Si avec 1 condition et deux exceptions

Bonsoir le forum.

Je voudrais adapter cette formule pour que si la colonne 4 contient "OK" et que la colonne 6 ne contient pas "AT" ou "AU" alors on supprime la ligne.

For i = Cells(Rows.Count, 4).End(xlUp).Row To 1 Step -1

If Cells(i, 4) = "OK" And Cells(i, 6) = "AT" Then Rows(i).Delete

Next i

Merci

Salut Moreno,

essaie comme ca

For i = Cells(Rows.Count, 4).End(xlUp).Row To 1 Step -1
If Cells(i, 4) = "OK" And (Cells(i, 6) <> "AT" OR Cells(i, 6) <> "AU") Then Rows(i).Delete
Next i

@+++

C'est exactement ça.

Merci

Rechercher des sujets similaires à "condition deux exceptions"