Es gibt zahlreiche Fälle, in denen Tom ein Arbeitsblatt aus einem anderen Programm in Excel importieren lässt, damit er mit den Daten arbeiten kann. Der Import funktioniert einwandfrei, aber der Importvorgang fügt viele (Dutzende und manchmal Hunderte) hinzu

von zusätzlichen Zeilen, die keine Daten enthalten. Nach dem Import muss Tom diese zusätzlichen Zeilen manuell löschen, damit er den Rest der Daten verwenden kann. Tom fragt sich, ob es eine Möglichkeit gibt, diese leeren Reihen leicht loszuwerden.

Es gibt verschiedene Möglichkeiten, wie Sie dieses Problem angehen können. Am einfachsten ist es, die importierten Daten einfach nach der Spalte Ihrer Wahl zu sortieren. Alle Zeilen, die nichts in dieser Spalte enthalten, landen entweder am Ende oder am Anfang der Daten (je nachdem, ob Sie in aufsteigender oder absteigender Reihenfolge sortieren), und Sie können diese Zeilen problemlos löschen.

Wenn Sie eine Sortierung auf diese Weise durchführen, können Ihre Daten natürlich aus der ursprünglichen, importierten Reihenfolge stammen. Wenn Ihre Daten in der ursprünglichen Reihenfolge vorliegen sollen, die leeren Zeilen jedoch entfernt sind, fügen Sie einfach eine Spalte links oder rechts von Ihren Daten ein, füllen Sie sie mit fortlaufenden Nummern, führen Sie die Sortierung nach einer beliebigen Spalte mit Ausnahme der hinzugefügten Spalte durch und Löschen Sie dann die leeren Zeilen (mit nur etwas in der Nummerierungsspalte).

Sie können dann ein zweites Mal anhand der Nummerierungsspalte sortieren und Ihre Daten werden wieder in der ursprünglichen Reihenfolge angezeigt.

Ein anderer Ansatz besteht darin, die folgenden Schritte auszuführen:

  1. Wählen Sie eine ganze Spalte aus.

  2. Drücken Sie F5. Excel zeigt das Dialogfeld Gehe zu an.

  3. Klicken Sie auf Spezial. Excel zeigt das Dialogfeld Gehe zu Spezial an. (Siehe Abbildung 1.)

  4. Wählen Sie Leerzeichen und klicken Sie dann auf OK. Excel wählt nur die Zellen in der Spalte aus, die leer sind.

  5. Wählen Sie Löschen aus dem Menü Bearbeiten. Excel zeigt das Dialogfeld Löschen an.

  6. Wählen Sie Ganze Zeile und klicken Sie dann auf OK.

Wenn Sie lieber ein Makro verwenden möchten, um die leeren Zeilen zu entfernen, können Sie Folgendes verwenden:

Sub DeleteEmptyRows()

Dim LastRow As Long     Dim J As Long

LastRow = ActiveSheet.UsedRange.Rows.Count + _       ActiveSheet.UsedRange.Rows(1).Row - 1     Application.ScreenUpdating = False     For J = LastRow To 1 Step -1         If Application.WorksheetFunction.CountA(Rows(J)) = 0 Then             Rows(J).Delete         End If     Next J     Application.ScreenUpdating = True End Sub

Warum sollten Sie ein Makro verwenden wollen? Weil Sie möglicherweise Woche für Woche leere Zeilen löschen müssen. Fügen Sie das Makro einfach in Ihre persönliche Arbeitsmappe ein und Sie können jederzeit darauf zugreifen.

Weitere Informationen zu diesem Thema finden Sie auf diesen Seiten:

http://www.cpearson.com/Excel/deleting.htm#DeleteBlankRows http://dmcritchie.mvps.org/excel/lastcell.htm

ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.

Dieser Tipp (7988) gilt für Microsoft Excel 2007, 2010, 2013 und 2016.

Eine Version dieses Tipps für die ältere Menüoberfläche von Excel finden Sie hier:

Leere Zeilen nach dem Import entfernen.