Jede zweite Zeile in Excel löschen: Eine Schritt-für-Schritt-Anleitung
Hier ist ein ausführliches Tutorial, wie du in Excel jede zweite Zeile (oder in einem bestimmten Rhythmus) löschen kannst.
In Excel gibt es keine direkte Schaltfläche "Jede zweite Zeile löschen". Dennoch lässt sich dies mit ein paar einfachen Tricks schnell erledigen – egal ob du eine kleine Tabelle oder tausende Datensätze hast.
Hier sind die drei besten Methoden:
Methode 1: Die Hilfsspalten-Methode (Empfohlen für Anfänger)
Dies ist die sicherste und einfachste Methode, da sie ohne Programmierung auskommt.
Schritt 1: Hilfsspalte erstellen
Füge rechts neben deinen Daten eine neue Spalte ein (nennen wir sie „Hilfe“).
Schritt 2: Muster eingeben
- Schreibe in die erste Zeile (Zelle B2) eine
0. - Schreibe in die zweite Zeile (Zelle B3) eine
1. - Markiere beide Zellen (die 0 und die 1).
- Ziehe das kleine grüne Quadrat an der unteren rechten Ecke der Markierung bis zum Ende deiner Liste nach unten. Excel führt das Muster (0, 1, 0, 1...) nun fort.
Schritt 3: Filter setzen
- Markiere deine gesamte Tabelle (inklusive der Hilfsspalte).
- Gehe im Menüband auf den Reiter Daten und klicke auf Filtern.
Schritt 4: Zeilen filtern und löschen
- Klicke auf den Filterpfeil in der Hilfsspalte.
- Wähle nur die
1aus (hake die0ab) und klicke auf OK. - Jetzt siehst du nur noch jede zweite Zeile. Markiere alle diese Zeilen (die Zeilennummern am linken Rand werden blau angezeigt).
- Rechtsklick auf die markierten Zeilen -> Zeile löschen.
Schritt 5: Filter aufheben und Hilfsspalte löschen
- Gehe wieder auf Daten -> Filtern, um den Filter zu deaktivieren.
- Lösche die Hilfsspalte. Fertig!
Methode 2: Die Formel-Variante (Schneller bei großen Datenmengen)
Anstatt manuell 0 und 1 einzutippen, kannst du eine Formel nutzen.
- Gib in der Hilfsspalte in der ersten Zeile folgende Formel ein:
=REST(ZEILE();2) - Kopiere die Formel nach unten.
- Ergebnis 0: Gerade Zeilennummer.
- Ergebnis 1: Ungerade Zeilennummer.
- Gehe nun wie in Methode 1 vor: Filter setzen, nach 0 oder 1 filtern und die sichtbaren Zeilen löschen.
Methode 3: Mit einem Makro (VBA) – Für Profis
Wenn du diese Aufgabe oft erledigen musst, ist ein Makro am effizientesten.
- Drücke
ALT+F11, um den VBA-Editor zu öffnen. - Gehe auf Einfügen -> Modul.
- Kopiere den folgenden Code in das Fenster:
Sub JedeZweiteZeileLoeschen()
Dim i As Long
Dim LetzteZeile As Long
' Bestimme die letzte Zeile in Spalte A
LetzteZeile = Cells(Rows.Count, 1).End(xlUp).Row
' Wir gehen von unten nach oben, damit die Zeilenindizes stabil bleiben
' Schrittweite -2 löscht jede zweite Zeile
For i = LetzteZeile To 1 Step -2
Rows(i).Delete
Next i
End Sub
- Drücke
F5oder klicke auf das "Play"-Symbol, um das Makro auszuführen. Hinweis: Erstelle vorher eine Sicherheitskopie deiner Datei, da Makros nicht mit „Rückgängig“ rückgängig gemacht werden können!
Zusammenfassung: Welche Methode soll ich wählen?
- Methode 1 (Manuell 0/1): Ideal, wenn du nur wenige Zeilen hast und keine Formeln magst.
- Methode 2 (REST-Formel): Am besten für große Tabellen, um schnell ein sauberes Muster zu erzeugen.
- Methode 3 (VBA): Perfekt, wenn du diese Aufgabe täglich in verschiedenen Dateien erledigen musst.
Pro-Tipp: Wenn du nicht jede 2., sondern jede 3. Zeile löschen willst, ändere die Formel in =REST(ZEILE();3). Alle Zeilen mit dem Ergebnis 0 sind dann deine Zielzeilen.