H hasardeux Guest 18 Décembre 2002 #1 Bonjour tout le monde, Comment je peux supprimer toutes les lignes dont les cellules de la colonne A contient une valeur numérique égale à 0
Bonjour tout le monde, Comment je peux supprimer toutes les lignes dont les cellules de la colonne A contient une valeur numérique égale à 0
C Cyber PAPY Guest 18 Décembre 2002 #2 Petite Idée sans doute à améliorer: a = 2 ' 1ere ligne de la zone n = 10 ' dernière ligne de la zone debut: n = n - 1 If n = a Then End If Cells(n, 1) <> "" Then GoTo debut Rows(n).Select Selection.Delete Shift:=xlUp GoTo debut Vote positif 0 Vote négatif
Petite Idée sans doute à améliorer: a = 2 ' 1ere ligne de la zone n = 10 ' dernière ligne de la zone debut: n = n - 1 If n = a Then End If Cells(n, 1) <> "" Then GoTo debut Rows(n).Select Selection.Delete Shift:=xlUp GoTo debut