Anzeige
Archiv - Navigation
768to772
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
768to772
768to772
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Leere Zeilen löschen mit Leerzeichen

Leere Zeilen löschen mit Leerzeichen
05.06.2006 17:48:53
Frank
Hallo Excelfreunde,
benötige nochmal Eure Hilfe.
Habe das Forum durchsucht aber nichts gefunden.
Kann ich leere Zeilen löschen die noch Leerzeichen enthalten. Die Daten kommen aus einer Textdatei und stehen alle in Spalte "A". Nach meiner Säuberung mit "Suchen und Ersetzen" bleiben in den Zellen Leerzeichen übrig und dann läst sich die komplette Zeile nicht löschen.
Für Eure Hilfe wäre ich sehr Dankbar.
Gruß Frank

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Leere Zeilen löschen mit Leerzeichen
05.06.2006 18:08:09
Josef
Hallo Frank!
Das geht z.B. so.

Sub LeereZeilenLoeschen()
Dim rng As Range
Dim lngrow As Long

lngrow = Cells(Rows.Count, 1).End(xlUp).Row

With Range("A1:A" & lngrow)
  .Replace " ", ""
  On Error Resume Next
  .SpecialCells(xlCellTypeBlanks).Delete xlUp
  On Error GoTo 0
End With

End Sub


'******************************
'* Gruß Sepp
'*
'* Rückmeldung wäre nett!
'******************************

Anzeige
AW: Leere Zeilen löschen mit Leerzeichen
08.06.2006 11:20:39
Frank
Nochmals Danke für die Hilfe.
So funktioniert es prima.
Gruß Frank

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige