Wie kann man in Excel schnell jede zweite Zeile löschen?
Möchten Sie in Excel schnell jede zweite Zeile oder Spalte löschen, ist der entscheidende Schritt, zunächst jede zweite Zeile oder Spalte effizient auszuwählen – und danach den Löschvorgang darauf anzuwenden. In diesem Artikel zeigen wir Ihnen bewährte Methoden, wie Sie zügig jede zweite Zeile oder Spalte auswählen und anschließend problemlos löschen können.
Jede zweite Zeile in Excel mithilfe des Filterbefehls löschen
Jede zweite Zeile in Excel mithilfe eines VBA-Codes löschen
Jede zweite Zeile oder Spalte in Excel mit Kutools für Excel löschen
Jede zweite Zeile in Excel mithilfe des Filterbefehls löschen
Mit dem Filter-Befehl in Microsoft Excel können Sie im Handumdrehen jede zweite Zeile filtern und anschließend auf einen Schlag löschen. So geht’s:
1. Geben Sie in einer leeren Spalte neben den Originaldaten 0,1,0,1…,0,1 ein. In diesem Beispiel tragen wir die Zahlen in die Hilfsspalte C ein. Siehe folgenden Screenshot:
2. Wählen Sie Spalte C aus und klicken Sie auf die Schaltfläche Filter unter der Registerkarte Daten. Klicken Sie anschließend auf die Pfeilschaltfläche neben C1 und aktivieren Sie ausschließlich das Kontrollkästchen für 0 unter der Option Alle auswählen. Siehe Screenshot:
3. Daraufhin werden alle Zeilen mit „1“ ausgeblendet. Wählen Sie die sichtbaren Zeilen mit „0“ aus und klicken Sie auf Start > Löschen > Arbeitsblattzeilen löschen, um diese Zeilen zu entfernen – so wird jede zweite Zeile gelöscht. Klicken Sie anschließend erneut auf die Schaltfläche Filter, um nur die Zeilen mit „1“ anzuzeigen. Siehe Screenshots:
 |  |  |
4. Abschließend können Sie die Hilfsspalte C bei Bedarf löschen.
Wählen Sie jede zweite oder n-te Zeile bzw. Spalte aus und löschen Sie diese dann auf einen Schlag.
Mit dem Dienstprogramm Kutools für Excel – Zeilen/Spalten in Intervallen auswählen – können Sie jede zweite oder n-te Zeile bzw. Spalte mühelos finden und markieren, um anschließend beliebige Aktionen darauf auszuführen.Zum Herunterladen von Kutools für Excel klicken!
Jede zweite Zeile in Excel mithilfe eines VBA-Codes löschen
Tatsächlich ist auch ein VBA-Makro eine gute Möglichkeit, dieses Problem zu lösen.
1. Halten Sie in Excel die Tasten Alt + F11 gedrückt. Dadurch öffnet sich das Fenster Microsoft Visual Basic for Applications.
2. Klicken Sie auf Einfügen > Modul, und fügen Sie das folgende Makro im Modul-Fenster ein.
VBA-Code: Jede zweite Zeile in der Auswahl löschen:
Sub DeleteEveryOtherRow()
'Updateby Extendoffice
Dim rng As Range
Dim InputRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Application.ScreenUpdating = False
For i = InputRng.Rows.Count To 1 Step -2
Set rng = InputRng.Cells(i, 1)
rng.EntireRow.Delete
Next
Application.ScreenUpdating = True
End Sub
3. Drücken Sie die Taste F5, um dieses Makro auszuführen. Anschließend erscheint ein Dialogfeld zur Auswahl eines Bereichs. Siehe Screenshot:
4. Klicken Sie anschließend auf OK, um jede zweite Zeile im markierten Bereich – beginnend ab der zweiten Zeile – auf einmal zu löschen. Siehe Screenshot:
 | |  |
Jede zweite Zeile oder Spalte in Excel mit Kutools für Excel löschen
Für Anwender, die neu mit Microsoft Excel arbeiten, ist die Verwendung eines VBA-Makros etwas kompliziert. Das Zeilen/Spalten in Intervallen auswählen-Dienstprogramm von Kutools für Excel hilft Ihnen dabei, jede zweite Zeile schnell zu löschen.
Nach der Installation von Kutools für Excelgehen Sie bitte wie folgt vor:
1. Wählen Sie den Bereich aus, in dem Sie jede zweite Zeile löschen möchten, und wenden Sie anschließend dieses Dienstprogramm an, indem Sie auf Kutools > Auswählen > Zeilen/Spalten in Intervallen auswählen… klicken.
2. Legen Sie im Dialogfeld Zeilen/Spalten in Intervallen auswählen die Einstellungen gemäß dem folgenden Screenshot fest und klicken Sie auf die Schaltfläche OK, um zunächst jede zweite Zeile auszuwählen.
3. Danach ist jede zweite Zeile innerhalb der Auswahl markiert und hervorgehoben. Siehe Screenshot:
4. Danach können Sie die ausgewählten Zeilen schnell löschen, indem Sie auf Start > Löschen > Arbeitsblattzeilen löschen klicken, um alle diese Zeilen zu entfernen. Siehe Screenshots:
 | |  |
Mit dieser Funktion können Sie zudem ganz nach Bedarf jede n-te Zeile oder Spalte löschen.
Laden Sie Kutools für Excel jetzt herunter und testen Sie es kostenlos!
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins