Macro pour supprimer des lignes

Résolu/Fermé

noe2008 Messages postés 183 Date d'inscription vendredi 18 juillet 2008 Statut Membre Dernière intervention 9 novembre 2023 - 28 mars 2016 à 22:39
noe2008 Messages postés 183 Date d'inscription vendredi 18 juillet 2008 Statut Membre Dernière intervention 9 novembre 2023 - 28 mars 2016 à 23:05

Bonjour,
je travaille sur une macro pour supprimer toutes les lignes dans ne contenant pas la valeur " valide " entre BG5:BG100
mais mon code contient des erreurs il ne marche pas
voila ma macro si vous pouvez m'aider et merci

Sub supp_ligne()
For Each cell In Range("BG5:BG100")
If cell <> "valide" Then Rows(i).Delete
Next

End Sub

A voir également:

Macro pour supprimer des lignes
Supprimer une page word - Guide
Supprimer compte instagram - Guide
Supprimer pub youtube - Accueil - Streaming
Impossible de supprimer un fichier - Guide
Supprimer liste déroulante excel - Guide

1 réponse

Réponse 1 / 1

ccm81 Messages postés 10906 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 13 janvier 2025 2 429
Modifié par ccm81 le 28/03/2016 à 22:55

Bonjour

il te faut commencer par le bas et en remontant. Essaies comme ceci

For li = 100 to 5 Step -1
  If Range("BG" & li).Value <> "valide" then Rows(li).Delete
Next li

Cdlmnt

noe2008 Messages postés 183 Date d'inscription vendredi 18 juillet 2008 Statut Membre Dernière intervention 9 novembre 2023 4
28 mars 2016 à 23:05

Discussions similaires