Excel suppression de lignes contenant "0"

Fermé
pier - 25 févr. 2011 à 09:35
 fjsd - 4 juil. 2019 à 11:44
Bonjour,

Voilà, j'ai un problème : j'ai une base de données dont je voudrais supprimer toutes les lignes dont la colonne A est égale à 0 à l'aide d'une macro.
Pourrait-on m'aider ?
Merci par avance.


A voir également:

3 réponses

Mike-31 Messages postés 18341 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 14 octobre 2024 5 101
25 févr. 2011 à 22:50
Salut,

Si tu veux vraiment passer par un code VBA, ce code supprimera les lignes dont les cellules en A sont vide ou = 0.
Pour supprimer que les ligne = 0 il faudra ajouter des conditionnelles And

Option Explicit
Sub test()
Dim i As Long
Application.ScreenUpdating = False
For i = Range("A65536").End(xlUp).Row To 1 Step -1
If Cells(i, 1) = 0 Then Rows(i).Delete
Next i
Application.ScreenUpdating = True
End Sub
3
Si peu de code pour un résultat parfait ! 1000 mercis !
0