Sujet Précédent Sujet Suivant

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:

1 réponse

Réponse 1 / 1
ccm81 Messages postés 10851 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 16 avril 2024 2 404
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
0
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
oui ça fonctionne maintenant merci
0

Discussions similaires

Afficher toutes les lignes masquées excel
livlarsen -
esicom -

26 réponses