Suppression de lignes en masse

Résolu/Fermé
Baptiste - 8 juin 2016 à 15:47
 Baptiste - 8 juin 2016 à 16:26
Bonjour,

Je fais appel à vous afin de gagner de nombreuses heures:

Je viens de récupérer une Base de données format Excel.
La colonne W (Téléphone) est la plus importante.
Je souhaiterais supprimer les LIGNES ENTIÈRES de toutes celles dont la cellule W est vide.

Y a t il une solution ?

Merci d'avance.

1 réponse

michel_m
Messages postés
16570
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
26 mai 2022
3 280
8 juin 2016 à 16:11
bonjour
avec une petite macro
sub Supprimer_si_vide()
Dim Ligne As Long
On Error Resume Next
Ligne = Columns("W").Find(what:="*", searchdirection:=xlPrevious).Row
Range("W2:A" & Ligne).SpecialCells(xlCellTypeBlanks).EntireRow.Delete
End Sub


0
Merci beaucoup !
0