Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.10.2025 15:55:14
wenn zwei Werte aus Liste übereinstimmen, dann wahr
14.10.2025 14:57:29
Wenn Datum in Ferienzeit dann Name angeben
14.10.2025 09:39:44
VBA - Excel speichern und schließen (Laufzeitfehler 91)
13.10.2025 19:31:31
VBA Formel mit Bezug auf Überschrift anstatt Spalte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1688to1692
1688to1692
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeile löschen wenn bestimmter Wert in Spalte

Forumthread: Zeile löschen wenn bestimmter Wert in Spalte

Zeile löschen wenn bestimmter Wert in Spalte
24.04.2019 13:11:48
Simon
Hallo,
für euch hier wahrscheinlich ein Leichtes....
Ich habe eine Tabelle, bestehend aus 5 Spalten und 20 Zeilen.
Wenn nun in der 4. Spalte ein Wert "A" oder "B" in einer Zelle vorkommt, so soll die entsprechend zugehörige Zeile komplett gelöscht werden.
Kleine Herausforderung dabei: Die 1. Spalte enthält Positionsnummern von 1 - 20. Diese sollen natürlich erhalten bleiben. Also wenn z. B. wegen o. g. Sache die Zeile 7 gelöscht wird, so sollen die dahinter liegenden Zeilen (abgesehen von der 1. Spalte wegen der Positionsnummern) eine Ebene höher springen.
Ich hoffe, es ist verständlich!?
Excel-Version 2016.
Vielen Dank im Voraus, Simon.
Anzeige

15
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeile löschen wenn bestimmter Wert in Spalte
24.04.2019 13:55:35
UweD
Hallo
so?
Option Explicit

Sub Zeile20()
    Dim i As Integer, SP As Integer, M As Integer
    
    SP = 1 'Spalte A 
    M = 20
    
    'Nummerierung per Formel 
    Cells(1, 1).Resize(M, 1).FormulaR1C1 = "=row()"
        
    For i = M To 1 Step -1 'Rückwärts 
        Select Case Cells(i, SP).Offset(0, 3)
            Case "A", "B"
                'Zeile löschen 
                Rows(i).Delete xlUp
            Case Else
                'Nichts 
        End Select
    Next
    
    'Nummerierung: Formel in Wert 
    With Cells(1, 1).Resize(M, 1)
        .Value = .Value
    End With

End Sub

LG UweD
Anzeige
AW: Zeile löschen wenn bestimmter Wert in Spalte
24.04.2019 17:35:21
Simon
Hallo.
Erstmal danke. Ich habe von VBA fast keine Ahnung. Den Code habe ich nun unter dem VBAProject, Tabelle 1 eingefügt. Es passiert aber nichts. Muss der Code noch irgendwie "aktiviert" werden?
AW: Zeile löschen wenn bestimmter Wert in Spalte
24.04.2019 17:40:06
UweD
Hi
Er sollte in ein normales Modul.
Lege dir einen Button ab und weise dann das Makro zu.
LG UweD
Anzeige
AW: Zeile löschen wenn bestimmter Wert in Spalte
24.04.2019 18:48:45
Günther
Moin,
es geht auch recht gut mit "ohne VBA" ... ;-)
* Daten in Power Query importieren
* 1. Spalte löschen
* 4. Spalte entsprechend filtern
* Neue Spalte mit 1-basiertem Index erstellen
* Diese Spalte an den Anfang verschieben und bei Bedarf umbenennen
Gruß
Günther
Anzeige
AW: Zeile löschen wenn bestimmter Wert in Spalte
24.04.2019 20:23:10
Simon
Auf dem PC ist zum einen eine Installation von Power Query nicht möglich, zum anderen kenne ich mich damit rein gar nicht aus.....
AW: Zeile löschen wenn bestimmter Wert in Spalte
24.04.2019 20:30:29
Günther
Im Club "Excel-User mit Scheuklappen" bist du gewiss herzlich willkommen !
Natürlich lässt es sich nicht installieren, denn in 2016 ist es bereits integriert.
Und in der heutigen Zeit, wo es im Netz alles zum Nulltarif gibt ist es natürlich überflüssig, sich selber neues Wissen anzueignen. Das strengt ja auch an ...
Mit traurigem Kopfschütteln
Günther
Anzeige
AW: Zeile löschen wenn bestimmter Wert in Spalte
25.04.2019 18:36:50
Simon
Na das nenne ich mal eine freundliche Antwort...
Zum einen bin ich ein ziemlicher Laie - weswegen ich überhaupt dieses Forum aufsuche. Zum anderen habe ich sehr wohl versucht mich zu informieren, bin aber recht schnell an der Stelle angekommen, dass man das Add-In angeblich installieren muss. Woher soll ich denn wissen, dass dies Info falsch ist und Excel 2016 es bereits enthält?
Na ja, dann schimpf ich mich eben "Excel-User mit Scheuklappen".
Anzeige
Code läuft bei mir-ansonsten siehe Günther-owT
24.04.2019 20:36:48
robert
AW: Zeile löschen wenn bestimmter Wert in Spalte
24.04.2019 20:21:45
Simon
Hab ich gemacht. Nun sagt er mir bei Betätigung des Buttons: Fehler beim Kompilieren. Innerhalb einer Prozedur ungültig.
AW: Zeile löschen wenn bestimmter Wert in Spalte
25.04.2019 08:51:36
UweD
Dann lad mal eine Musterdatei hoch.
Anzeige
AW: Zeile löschen wenn bestimmter Wert in Spalte
25.04.2019 17:22:54
Hajo_Zi
lasse den Fragesteller entscheiden ob offen.
Es ist heute nicht mehr üblich eine Rückmeldung zu geben und so ist der Beitrag über 6 Tage offen.

AW: Zeile löschen wenn bestimmter Wert in Spalte
25.04.2019 19:05:40
Simon
Entschuldige bitte die Verspätung. Vermutlich hab ich beim Button schon was falsch gemacht!?
https://www.herber.de/bbs/user/129396.xlsm
Anzeige
AW: Zeile löschen wenn bestimmter Wert in Spalte
26.04.2019 08:43:16
UweD
Hallo
- Du hast eine Sub in eine Sub eingeschlossen..
- Ausserdem ist es jetzt eine andere Spalte
- Die Formel hab ich auch noch angepasst =WENN(B1&lt&gt"";ZEILE();"")
so muss es sein.
Microsoft Excel Objekt Tabelle1 
Option Explicit 
Private Sub CommandButton1_Click() 
    Dim i As Integer, SP As Integer, M As Integer 
     
    SP = 1 'Spalte A 
    M = 20 
     
    'Nummerierung per Formel 
    Cells(1, 1).Resize(M, 1).FormulaR1C1 = "=IF(RC[1]<>"""",ROW(),"""")" 
         
    For i = M To 1 Step -1 'Rückwärts 
        Select Case Cells(i, SP).Offset(0, 4) 
            Case "a", "b" 
                'Zeile löschen 
                Rows(i).Delete xlUp 
            Case Else 
                'Nichts 
        End Select 
    Next 
     
    'Nummerierung: Formel in Wert 
    With Cells(1, 1).Resize(M, 1) 
        .Value = .Value 
    End With 
 
 
End Sub

LG UweD
Anzeige
AW: Zeile löschen wenn bestimmter Wert in Spalte
26.04.2019 09:45:48
Simon
Funktioniert jetzt.
Super - vielen lieben Dank!!!
Prima! Danke für die Rückmeldung. owT
26.04.2019 10:28:48
UweD
;

Forumthreads zu verwandten Themen

Alles bis auf jede 4. Zeile löschen
markus

für meine diplomarbeit habe ich hier eine addressliste mit 14550 einträgen, die von A (Name Besitzer) bis H (Telefonnummer) reicht, und der fragebogen den ich erstellt habe soll nun an jede 4. person geschickt werden.
sprich ich suche nach einer möglichkeit, wie ich excel mitteile, dass jed...
02.06.2010 01:18:00
Thread-ID: 1159952
3 Beiträge
Zeile löschen wenn bestimmter Wert
Simon

Hallo zusammen,
ich weiß es gibt schon Einträge zu dem Thema, aber ich bekomms einfach nicht hin.
Ich habe eine Datei, die 40000 x-y-z Koordinaten enhält (x in Spalte A, y in Spalte B und z in Spalte C)
Jetzt möchte ich alle Zeilen löschen die einen bestimmten y-Wert haben (Beispiel...
21.02.2011 11:08:18
Thread-ID: 1202039
3 Beiträge
Summe bilden und Zeilen löschen
Holger

Guten Tag, ich bitte um Hilfe.
In Spalte A stehen Nummern, eine Nummer kann einmal oder auch mehrmals vorkommen. In Spalte E stehen die dazugehörigen Summen. Ich möchte realisieren, dass bei doppelt oder mehr gleicher Nummern, die Summe dieser gleichen, der ersten dieser Nr. zugeschrieben w...
17.03.2011 13:07:18
Thread-ID: 1206098
5 Beiträge
Zellen verknüpfen wenn bestimmter Wert
Olly

Hallo Leute,

ich möchte wenn z.B. in Tabelle1 in Zelle A1 eine Name oder Zahl/Kundennummer steht in Bezug darauf aus Tabelle2/Adressdatei die dazugehörige Adresse in Tabelle 3 in den Zellen A2, B2 und C2 erscheinen lassen. Wie muß ich vorgehen?
Danke für Eure Hilfe
Oli
25.05.2002 19:31:23
Thread-ID: 123700
7 Beiträge
BITTE Hilfe bei Makro! Bestimmte Zeilen löschen
Micha

Hallo liebe Spezialisten.
Ich suche ein Makro, welches mir nur die Zeilen mit dem Start und Enddatum anzeigt.
Alle übrigen Spalten sollen gelöscht werden.
Eine Beispieldatei befindet sich im Dateianhang.
Beschreibung befindet sich im Kommentar A2
https://www.herber.de/bbs/us...
02.05.2012 16:07:31
Thread-ID: 1261865
10 Beiträge
Farbige Zeilen nicht löschen
Andi

Hi Leute, ich werd grad wahnsinnig - ich habe eine Tabelle, in der leider nur ca. jede 5. Zeile einen Wert enthält (Buchstaben)
Ich habe die Werte mit bedingter Formatierung eingefärbt und wollte jetzt einfach die leeren Zeilen dazwischen entweder löschen oder ausblenden, damit ich eine du...
26.04.2013 18:38:26
Thread-ID: 1310690
5 Beiträge
Makro: Zeilen mit bestimmten Inhalt löschen
Markus Gerhartz

Hallo nochmal,also es wäre wirklich ziemlich wichtig für mich. Ich benötige ein Makro zum löschen von Zeilen mit bestimmten unterschiedlichen Inhalten.Z. B.Anzahl: Name:
33 Cvs
3423 images
664 jsuswIch möchte nun zum Beispiele alle Zeilen mit dem Inh...
18.07.2002 13:02:28
Thread-ID: 137905
11 Beiträge
Anzeige
Sverweis per Makro bis Zeile x löschen
Manu

Hallo Zusammen,
ich habe eine Tabelle mit 3 Spalten (siehe Anhang). Wenn ich in Spalte A eine Artikelnummer eingebe zieht sich Excel in Spalte B und C Informationen per Sverweis rein. Diese Informationen sind in der gleichen Mappe in Tabelle 2 hinterlegt. Das funktioniert soweit gut.
Me...
26.03.2015 12:48:18
Thread-ID: 1417271
4 Beiträge
Zeile löschen, wenn nicht bestimmter Wert vorhande
Gavri

Hallo zusammen,
ich habe eine Tabelle mit ca. 58 - 63 Tsd Zeilen. Es sollen alle Zeilen gelöscht werden, die nicht "FRA" in Spalte S stehen haben.
Ich habe folgenden Code im Internet gefunden, damit dauert es sehr lange. Kann man diesen beschleunigen?
Dim i As Long
Dim letzteZei...
11.11.2015 13:42:33
Thread-ID: 1457636
11 Beiträge
Zellen mit Were markieren wenn bestimmter Wert
ABL

Ich habe eine Tabelle Spalte A , B , C mit variablen Werten und Text in Spalte B und C.
In der Spalte A steht eine Formel: Sobald die Zelle in Spalte B mit einem Wert belegt ist erscheint die Zahl 1 sonst 0.
Es sollen nur die Zellen markiert werden die Werte bzw. Text enthalten wenn in...
02.09.2019 12:27:33
Thread-ID: 1710722
6 Beiträge
Anzeige
PowerQuery - Zeilen zusammenstellen
Anja
Hallo Excel-Fans,
ich verbiege mich gerade mit PowerQuery und komme einfach nicht auf die Lösung. Eventuell müsste ich das Problem auch einfach mit einer Formel lösen.
Keine Option allerdings sollte die Trennung in 2 Abfragen sein, die ich dann zusammen füge (aller letzte Lösung sozusagen).<...
25.03.2022 12:18:24
Thread-ID: 1876841
7 Beiträge
PowerQuery Zeilenübergreifend / Bedingt nach unten ausfüllen
Marcel2000
Hallo liebe Excel-Gemeinde,

ich soll eine Datei mit PowerQuery aufbauen, in der die Personalstärke der nächsten 18 Monate prognostiziert wird. Dazu bekomme ich alle möglichen Infos von der HR-Abteilung.
Bin auch schon relative weit. Ich hänge jetzt allerdings bei der Berücksichtigung de...
31.10.2024 15:51:24
Thread-ID: 1995295
6 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Zeilen Löschen in Excel: So Geht's

Schritt-für-Schritt-Anleitung

Um Zeilen in Excel zu löschen, wenn ein bestimmter Wert in einer Spalte vorhanden ist, kannst du die folgende VBA-Methode verwenden. Diese Anleitung basiert auf Excel 2016.

  1. Öffne den VBA-Editor: Drücke ALT + F11, um den Visual Basic for Applications (VBA) Editor zu öffnen.

  2. Füge ein neues Modul hinzu: Klicke mit der rechten Maustaste auf VBAProject (DeineDatei.xlsx) > Einfügen > Modul.

  3. Füge den Code ein: Kopiere den folgenden Code in das Modul:

    Option Explicit

Sub ZeilenLoeschen()
   Dim i As Integer, SP As Integer, M As Integer

   SP = 4 'Spalte D (4. Spalte)
   M = Cells(Rows.Count, SP).End(xlUp).Row ' Letzte Zeile in Spalte D

   For i = M To 1 Step -1 ' Rückwärts durch die Zeilen gehen
       If Cells(i, SP).Value = "A" Or Cells(i, SP).Value = "B" Then
           Rows(i).Delete xlUp ' Zeile löschen
       End If
   Next i
End Sub

  4. Makro ausführen: Schließe den VBA-Editor und gehe zurück zu Excel. Drücke ALT + F8, wähle ZeilenLoeschen und klicke auf Ausführen.

  5. Überprüfe die Ergebnisse: Die Zeilen mit den Werten "A" und "B" in der 4. Spalte sollten nun gelöscht sein.

Häufige Fehler und Lösungen

  • Fehler beim Kompilieren: Überprüfe, ob der Code korrekt in ein normales Modul eingefügt wurde und nicht in ein Arbeitsblatt-Modul.

  • Makro wird nicht ausgeführt: Stelle sicher, dass die Makros in Excel aktiviert sind. Gehe zu Datei > Optionen > Trust Center > Einstellungen für das Trust Center > Makroeinstellungen und aktiviere die Option für alle Makros.

Alternative Methoden

Wenn du die Verwendung von VBA vermeiden möchtest, kannst du auch Power Query verwenden, um Zeilen zu löschen:

  1. Daten in Power Query importieren: Wähle die Daten aus und gehe zu Daten > Aus Tabelle/Bereich.

  2. Filter anwenden: Klicke auf die Dropdown-Liste der 4. Spalte und filtere nach "A" oder "B".

  3. Entfernen der gefilterten Zeilen: Klicke mit der rechten Maustaste auf die gefilterten Zeilen und wähle Zeilen löschen.

  4. Daten laden: Klicke auf Schließen & Laden, um die bereinigten Daten zurück in Excel zu übertragen.

Praktische Beispiele

  • Beispiel 1: Du hast eine Excel-Tabelle mit Verkaufsdaten. Wenn du alle Zeilen mit dem Status "storniert" in der 4. Spalte löschen möchtest, kannst du die oben genannten Schritte verwenden.

  • Beispiel 2: Wenn du nur die leeren Zeilen in einer Tabelle entfernen möchtest, kannst du Power Query verwenden, um diese zu filtern und zu löschen.

Tipps für Profis

  • Verwende Power Query: Wenn du oft mit großen Datenmengen arbeitest, ist Power Query eine leistungsstarke Option, um gefilterte Zeilen zu löschen und die Daten zu transformieren.

  • Automatisiere mit Makros: Wenn du regelmäßig die gleichen Daten bereinigst, erstelle ein Makro, das die Schritte automatisiert, um Zeit zu sparen.

FAQ: Häufige Fragen

1. Wie kann ich in Power Query gefilterte Zeilen löschen?
Nutze die Filterfunktion, um die gewünschten Zeilen auszuwählen, und klicke dann auf Zeilen entfernen.

2. Kann ich auch leere Zeilen in Power Query entfernen?
Ja, wähle die Spalte, filtere die leeren Werte und lösche diese Zeilen.

3. Wie lösche ich Zeilen in Power BI?
In Power BI kannst du ähnliche Schritte wie in Power Query ausführen, um leere oder unerwünschte Zeilen zu entfernen.

4. Welche Excel-Version wird empfohlen für Power Query?
Power Query ist in Excel 2016 und späteren Versionen integriert, was es einfach macht, ohne zusätzliche Installationen zu arbeiten.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige