Besoin d'aide, je renseigne un fichier excel en copiant collant et de temps en temps j'ai des lignes vides.
Comment avec une macro supprimer ces lignes vides au fur et à mesure ??????
Voici une macro élaborée par Hervé, que je remercie .
Code:
Sub Supprime_lignes_vides()
Dim I As Long
For I = ActiveSheet.UsedRange.Rows.Count To 1 Step -1
If Application.CountA(Rows(I)) = 0 Then Rows(I).Delete
Next I
End Sub
Voici une macro élaborée par Hervé, que je remercie .
Code:
Sub Supprime_lignes_vides()
Dim I As Long
For I = ActiveSheet.UsedRange.Rows.Count To 1 Step -1
If Application.CountA(Rows(I)) = 0 Then Rows(I).Delete
Next I
End Sub