Suppression de lignes en masse
Résolu/Fermé
A voir également:
- Suppression de lignes en masse
- Forcer suppression fichier - Guide
- Renommer fichier en masse - Guide
- Site de vente en ligne particulier - Guide
- Partage de photos en ligne - Guide
- Suppression page word - Guide
1 réponse
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 303
8 juin 2016 à 16:11
8 juin 2016 à 16:11
bonjour
avec une petite macro
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
8 juin 2016 à 16:26