Discussion :

[juju05]

Je cherche à supprimer toutes les lignes d'un tableau dont la valeur d'une colonne est égale à 0.

Pour cela, je me suis placé sur la colonne dont la valeur détermine si il faut supprimer la ligne et j'ai parcouru toute les lignes et je les ai éventuellement supprimées.

N'y a t-il pas un moyen plus rapide :
-en sélectionnant tout le tableau par instruction (équivalent d'un CTRL + Maj + Fin)
- en supprimant les lignes du tableau dont la valeur est 0 ?

Je ne sais pas coder ces actions.

Merci d'avance.

[mercatog]

Bonsoir,
sur la colonne B (par exemple)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Sub Test()
Dim LastLig As long, i As long 
LastLig = Cells(Rows.Count, 2).End(xlUp).Row
 
For i = LastLig To 2 Step -1
    If Cells(i, 2) = 0 Then Rows(i).Delete
Next i
End Sub

[juju05]

Je te remercie bien mais cela correspond plus ou moins à ce que j'ai fait.

Je :
- me suis placé sur la cellule C2
- j'ai fait une boucle jusqu'à valeur cellule = ""
- si valeur cellule = "0" alors je supprime la ligne,
- je descend d'une ligne.

En fait je me demande si il n'y a pas un autre moyen. Un peu comme si je pouvais sélectionner l'ensemble du tableau et supprimer certaines lignes par une méthode^.

[mercatog]

Combien tu as de données?
autre proposition, tu peux
créer un filtre
supprimer les lignes
supprimer le filtre

[juju05]

J'en ai assez peu, c'est surtout pour apprendre un moyen efficace.

Comment faire concrétement si je créé un filtre ?

Je peux me positionner sur la cellule C2 et descendre, vais-je ne lire que les cellules visibles ? C'est vrai que je pourrai essayer avec ma macro (elle est au boulot et je n'y vais pas avant quelques jours ...).