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 :
Merci de votre réponse,
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
Chtik
Partager