Suppression de lignes en masse

Résolu
Baptiste -  
 Baptiste -
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

  1. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    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
    1. Baptiste
       
      Merci beaucoup !
      0