Supprimer les lignes avec un "0" à partir de la ligne x.

shynseby Messages postés 22 Date d'inscription   Statut Membre Dernière intervention   -  
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

J'ai une macro qui me supprime les lignes avec un "0" dans la colonne A.

Elle marche correctement mais j'aimerais qu'elle comme à partir de la ligne N°3 car j'ai des données en lignes 1 et 2 que je veux garder et qui "0" en colonne A

voici la Macro:

    For i = Range("A20000").End(xlUp).Row To 1 Step -1
If Cells(i, 1) = 0 Then Rows(i).Delete
Next i



A voir également:

1 réponse

f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

Peut-etre pas tout compris mais:

Sub test()
    For i = Range("A20000").End(xlUp).Row To 3 Step -1
        If Cells(i, 1) = 0 Then Rows(i).Delete
    Next i
 End Sub
0
shynseby Messages postés 22 Date d'inscription   Statut Membre Dernière intervention  
 
j'ai essayer mais cela marche pas.

le but est que la macro laisse tranquille la ligne 1 et 2 de mon tableau et traite les lignes suivantes à partir de la ligne 3
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713 > shynseby Messages postés 22 Date d'inscription   Statut Membre Dernière intervention  
 
Re,

ce code part de la derniere cellule non vide de la colonne A et remonte jusqu'a la ligne 3, que voulez- vous de plus ???
0
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Salut, ca roule
0