Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
396to400
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
396to400
396to400
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Leere Zeilen löschen

Leere Zeilen löschen
18.03.2004 08:59:25
Ralf
Hallo - wer kann mir helfen?
ich habe eine sehr lange Tabelle (8000 Zeilen)
und zwischendurch habe ich immer wieder leere Zeilen.
Wie bekomme ich sie heraus, ohne sie per Hand löschen
zu müssen?
Danke!
MfG
Ralf

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Leere Zeilen löschen
18.03.2004 09:01:54
geri
Hallo Ralf
aus Forum

Sub Leerzeilenlöschen()
' Leerzeilen löschen einschließlich der Zeilen die entstehen wenn Zeilen am ende
' gelöscht werden, auch Leerzeilen in der Tabelle werden gelöscht
' von Wolf.W.Radzinski
On Error Resume Next
Dim r As Range
Dim anz As Long
Dim c_ges As Long
Dim col As New Collection
c_ges = ActiveSheet.UsedRange.Column + ActiveSheet.UsedRange.Columns.Count - 1
For Each r In ActiveSheet.UsedRange.EntireRow
anz = 0
anz = r.SpecialCells(xlCellTypeBlanks).Count
If anz >= c_ges Then col.Add r
Next
For Each r In col
r.Delete
Next
End Sub

gruss geri
Anzeige
AW: Leere Zeilen löschen
18.03.2004 09:02:53
MRP
Hallo Ralf,
wenn du eine Spalte hast, die immer gefüllt, dann sortiere einfach nach dieser Spalte. Oder aber markieren, Gehe zu/Inhalte... Häkchen bei leere Zellen, und dann wie gewohnt löschen, wenn die Reihenfolge nicht durcheinander kommen darf.
Ciao
Manuele Rocco Parrino
AW: Leere Zeilen löschen
18.03.2004 11:07:16
Ulf
Tabelle sortieren!
Ulf

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige