Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
isabelle
bonjour benjaminalimi,
Sub Macro1() For i = Sheets("Feuil1").Range("A65536").End(xlUp).Row To 1 Step -1 If Application.CountA(Rows(i)) = 0 Then Rows(i).Delete Shift:=xlUp Next End Sub
isabelle
J'ai une feuille excel qui contient beaucoup de données. Au milieu de toute cette feuille, il y a des lignes vides un peu partout (de manière aléatoire)
Comment commander le parcours de la feuille pour supprimer toutes les lignes vides de la feuille?
Merci
bonjour benjaminalimi,
Sub Macro1()
For i = Sheets("Feuil1").Range("A65536").End(xlUp).Row To 1 Step -1
If Application.CountA(Rows(i)) = 0 Then Rows(i).Delete Shift:=xlUp
Next
End Sub
isabelle
J'ai une feuille excel qui contient beaucoup de données. Au milieu de
toute cette feuille, il y a des lignes vides un peu partout (de manière
aléatoire)
Comment commander le parcours de la feuille pour supprimer toutes les
lignes vides de la feuille?
Sub Macro1() For i = Sheets("Feuil1").Range("A65536").End(xlUp).Row To 1 Step -1 If Application.CountA(Rows(i)) = 0 Then Rows(i).Delete Shift:=xlUp Next End Sub
isabelle
J'ai une feuille excel qui contient beaucoup de données. Au milieu de toute cette feuille, il y a des lignes vides un peu partout (de manière aléatoire)
Comment commander le parcours de la feuille pour supprimer toutes les lignes vides de la feuille?
