Discussion :

[Chtik]

Bonjour,

Je cherche à faire une boucle supprimer les lignes qui renvoient le texte "OUI" ou "PEUT-ETRE" dans des cellules avec une fonction "RECHERCHEV" à l'origine (voir fichiez joint).

J'ai essayé ce code mais ça ne fonctionne pas :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Sub SupLigneOui()
   Application.ScreenUpdating = False
   For J = [A65000].End(xlUp).Row To 1 Step -1
      If Left(Cells(J, 1), 4) = "FAUX" Then Rows(J).Delete
   Next J
End Sub

Merci de votre réponse,
Chtik