Weitere interessante Artikel
Verwenden von Filtern zum Löschen leerer Zeilen in Excel
Diese Methode eignet sich zum Löschen leerer Zeilen, die sich zwischen Daten mit Kopf- oder Titelspalten befinden. Außerdem können Sie Daten nach bestimmten Kriterien filtern, bevor Sie die leeren Zeilen löschen. Hier sind die Schritte:
- Wählen Sie alle vorhandenen Daten in Ihrem Excel-Arbeitsblatt aus, indem Sie auf der Tastatur auf die Tastenkombination “Ctrl + A” klicken oder auf die Schaltfläche Alle auswählen in der oberen linken Ecke des Excel-Fensters klicken.
- Klicken Sie im Menüband auf die Registerkarte “Data”, und klicken Sie dann in der Gruppe “Sort & Filter” auf “Filter”. Excel fügt in jeder Spaltenüberschrift oder Überschrift einen kleinen Pfeil hinzu.
- Klicken Sie auf den kleinen Pfeil in einer der Kopf- oder Titelspalten und deaktivieren Sie dann die Option “Select All”. Aktivieren Sie nur die Option “Blanks”, und klicken Sie dann auf OK. Excel zeigt nur die leeren Zeilen an, die sich in dieser Spalte befinden.
- Wählen Sie alle angezeigten leeren Zeilen aus, indem Sie auf der Tastatur die Tastenkombination “Ctrl + A” drücken oder auf die Taste “Select All” im Excel-Menüband klicken.
- Klicken Sie mit der rechten Maustaste auf eine der ausgewählten leeren Zeilen, und wählen Sie dann im angezeigten Menü die Option “Delete” aus. Wählen Sie im Dialogfeld “Delete” das Dialogfeld “Entire row” aus, und klicken Sie dann auf OK. Excel löscht alle leeren Zeilen in dieser Spalte.
- Wiederholen Sie die Schritte 3 bis 5 für alle Kopfspalten oder andere Überschriften, die leere Zeilen zwischen den Daten enthalten.
Verwenden von Makros zum Löschen leerer Zeilen in Excel
Diese Methode eignet sich zum Löschen einer großen Anzahl leerer Zeilen oder wenn Sie diese Aufgabe häufig ausführen und Ihren Zeit- und Arbeitsaufwand verkürzen möchten. Für diese Methode müssen Sie ein Makro oder VBA-Code erstellen und ausführen, mit dem leere Zeilen automatisch gelöscht werden können. Hier sind die Schritte:
- Öffnen Sie das Excel-Arbeitsblatt, aus dem Sie leere Zeilen löschen möchten, und drücken Sie dann die Tastenkombination “Alt + F11” auf der Tastatur, um das Fenster “Visual Basic Editor” zu öffnen.
- Klicken Sie auf das Menü “Insert” und wählen Sie dann die Option “Module” aus. Excel fügt ein neues Modul unter “Project Explorer” hinzu.
- Geben Sie den folgenden Code in das Modulfenster ein:
Sub DeleteBlankRows() Dim ws As Worksheet Dim rng As Range Dim lastRow As Long Dim i As Long Set ws = ActiveSheet lastRow = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row Set rng = ws.Range("A1:A" & lastRow) Application.ScreenUpdating = False For i = lastRow To 1 Step -1 If WorksheetFunction.CountA(rng.Rows(i)) = 0 Then rng.Rows(i).EntireRow.Delete End If Next i Application.ScreenUpdating = True MsgBox "Blank rows have been deleted." End Sub
- End Sub Klicken Sie auf dasMenü „Ausführen“ und wählen Sie dann die Option „Sub/UserForm ausführen“ oder drücken Sie die Tastenkombination F5 auf Ihrer Tastatur, um das Makro auszuführen. Excel löscht alle vorhandenen leeren Zeilen in Ihrem Arbeitsblatt und zeigt eine Bestätigungsmeldung an.