If <> OR

Bonjour, j'aimerais que si le département de mon code postal n'est pas du 57 ou 54 la ligne se supprime.
Je n'arrive pas à utiliser la fonction OR dans mon if.

Voici le code:

Code:

---

1 2 3

For i = [A65000].End(xlUp).Row To 1 Step -1 If Left(Cells(i, 5), 2) <> "57" Or Left(Cells(i, 5), 2) <> "54" Then Rows(i).Delete Next i

---

Merci d'avance pour votre aide

Bonjour,

mauvaise logique !

If Not (Left(Cells(i, 5), 2) = "57" Or Left(Cells(i, 5), 2) = "54") Then Rows(i).Delete …

__________________________________________________________________________________________

Merci de cliquer sur :plusser: pour chaque message ayant aidé puis sur :resolu: pour clore cette discussion …

Bonjour John, le Forum

Pour le cas que tu décris, je mettrais non pas un OR mais un AND. Si j'ai bien compris tu souhaites supprimer toutes les lignes qui sont différentes de 57 ET 54 pour les deux premières valeurs d'un code postal.

Slts

Autre manière évitant d'extraire deux fois le département :

If InStr("54 57", Left$(Cells(i, 5).Value, 2)) = 0 Then Rows(i).Delete …


__________________________________________________________________________________________

Merci de cliquer sur :plusser: pour chaque message ayant aidé puis sur :resolu: pour clore cette discussion …

Ca marquel niquel. Un grand merci!
Je ne comprends tout de même pas ce qui clochait dans mon code...

danixdb l'a pourtant bien expliqué !

Ben traduis juste ton code en langage naturel (i-e courant, parlé …) et cela devrait te frapper !

Bon avec un tant soit peu de logique quand même …

En effet je viens de comprendre, mon premier supprime tout, y compris les "54" et mon second supprime tout y compris "57" :roll:

une petite astuce:
les Ou (Or) sont comparable à 1 + 0= 1 Vrai
les Et (And) sont comparable à 1 * 0= 0 faux