suprimer les lignes vides

[pat13400]

bonjour

dans une feuille de calcul 1 seule de colone de donnees

mais beaucoup de lignes vides

comment peux t on suprimer ces lignes vides d un seul coup

merci d avance

 

[ERIC S]

Bonjour

tu peux peut-être trier

ou

filtrer les non vides puis copier et coller sur une autre feuille

ou sinon par macro

A+

 

[GIBI]

Bonjour,

en triant la colonne cela marche au poli,

- selection de la colonne puis tri ascendant ==> cellules vides se retrouvent en fin de liste



samut

 

[pat13400]

bonjour et merci a vous tous

le tri sur les non vides plus copier sur une autre feuille

c est le must

merci encore

 

[Staple1600]

Bonsoir

Un exemple en VBA en provenance de l'OI
(fonctionne pour la feuille active)

sub efflign()
Dim derLigne
Dim I
derLigne = ActiveSheet.UsedRange.Row + ActiveSheet.UsedRange.Rows.Count - 1
Application.ScreenUpdating = False
For I = derLigne To 1 Step -1
If Application.WorksheetFunction.CountA(Rows(I)) = 0 Then
Rows(I).Delete
End If
Next I
End Sub

 

[Staple1600]

Bonsoir

Un exemple en VBA en provenance de l'OI
(fonctionne pour la feuille active)

sub efflign()
Dim derLigne
Dim I
derLigne = ActiveSheet.UsedRange.Row + ActiveSheet.UsedRange.Rows.Count - 1
Application.ScreenUpdating = False
For I = derLigne To 1 Step -1
If Application.WorksheetFunction.CountA(Rows(I)) = 0 Then
Rows(I).Delete
End If
Next I
End Sub