Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 00:20:14
Bestimmte Spalten als xls exportieren per Makro
23.04.2024 22:08:10
Auflisten in Spalte VBA
23.04.2024 21:33:46
Nur farbige/nicht farbige Zellen markieren
23.04.2024 21:29:56
Bestimmte Zellen auf andere Arbeitsblätter kopieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
512to516
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
512to516
512to516
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeilen löschen, wenn Bedingung in Spalte erfüllt

Zeilen löschen, wenn Bedingung in Spalte erfüllt
05.11.2004 09:52:24
Os
Guten Morgen, zusammen,
In einem benannten Bereich, den ich mit Application.Goto Reference:="BT" aufrufe, sollen all jene Zeilen gelöscht werden, bei denen in Spalte T [Column20] der String 'umme' vorkommt. Kann mir dabei bitte jemand helfen, vielen herzlicehn Dank.
LG, Iris

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilen löschen, wenn Bedingung in Spalte erfüllt
AndréL.
Hallo Iris,
versuche diesen Code einzubauen, oder
seperat auszuführen.

Sub löschen()
Dim i
For i = Cells(Rows.Count, 20).End(xlUp).Row To 1 Step -1
On Error Resume Next
If Cells(i, 20).Value = "umme" Then
Rows(i).Delete
End If
Next
End Sub

Gruß
AndréL.
PS. Rückmeldung wäre nett
AW: Zeilen löschen, wenn Bedingung in Spalte erfüllt
05.11.2004 13:19:54
Os
Lieber André, vielen Dank und sorry für die späte Meldung, bin am Arbeitsplatz, da kommt halt immer was quer...
Leider komme ich mit deinem Vorschlag nicht weit, es tut sich gar nix, nicht mal Fehlermeldung. Könnten wir uns missverstanden haben? Es gibt keine Zellen mit Inhalt gleich umme, aber mit Inhalt ENTHÄLT (Teilstring) 'umme'... Ich vermute, es liegt am
.Value = "umme"
Wie kann ich statt Gleichheitszeichen das 'enthält' ausdrücken? Vieln Dank vorab!
LG, Iris
Anzeige
AW: Zeilen löschen, wenn Bedingung in Spalte erfüllt
AndréL.
Hallo Iris,
hatte auch erst jetzt wieder Gelegenheit zu testen,
aber so müßte es laufen: (Ohne Gewähr!)

Sub löschen()
Dim i
For i = Cells(Rows.Count, 20).End(xlUp).Row To 1 Step -1
On Error Resume Next
If InStr(Cells(i, 20).Value, "umme") Then
Rows(i).Delete
End If
Next
End Sub

Gruß
AndréL.
AW: Zeilen löschen, wenn Bedingung in Spalte erfül
05.11.2004 19:24:16
Os
Hallo, André,
inzwischen von daheim aus:
habe die Hilfe zu InStr bemüht, bin nicht 'draus schlau geworden, aber dein Code hat funktioniert! Herzlichen Dank.
Schönen Abend, Iris
Danke für die Rückmeldung !! :-) mT.
AndréL.
Hallo Iris,
Soooooo gut kenne ich mich mit VBA auch (noch) nicht aus,
ich habe einfach :
1. Probiert
2. In der hervorragenden Recherche gesucht.
Schönes Wochenende
André
Anzeige

56 Forumthreads zu ähnlichen Themen

Zellen ausfüllen wenn Bedingung erfüllt (per VBA)
Jessi

Hallo zusammen,
ich habe mal wieder eine Frage bzw. ein Problem, dass ich nicht selbst lösen kann.
Ich lasse per Userform in die Spalte B einen "String" schreiben, das funktioniert auch schon (nicht in Beispielmappe integriert)
Beispielmappe:
https://www.herber.de/bbs/user/6928...
28.04.2010 19:30:32
Thread-ID: 1154354
4 Beiträge
Anzeige
Zellen zählen, wenn zwei Bedingungen erfüllt sind
MB

Hallo zusammen,
ich möchte eine Matrix aufstellen, mit der ich verschiedenen Mitarbeitern verschiedene Ereignisse zuschlüsseln kann.
In Tabelle 1 steht in Zeilen der Name und auch das Ereignis. Der Mitarbeiter kann mehrmals vorkommen und auch die Ereignisse können unterschiedlich sein:<...
03.05.2011 19:03:16
Thread-ID: 1212923
4 Beiträge
Zelleintrag nur wenn Bedingung erfüllt
Dietmar

Hallo in die Runde,
kann mir jemand sagen, wie nachfolgenden Code anpassen muss, so dass zusätzlich in Spalte
C2:C10 Werte nach Eintrag wieder gelöscht werden, wenn in Spaltenbereich A2_A10 in der entsprechenden Zeile ein "E" oder nichts steht.
Eine Msgbox mit der entsprechedhenden...
29.07.2011 13:56:57
Thread-ID: 1224155
3 Beiträge
Anzeige
Zeilen aus Range löschen, wenn Bedingung erfüllt
Peter

Guten Tag
Mit untenstehendem Code lösche ich gewisse Zeilen, wenn diese in einmem String auf der gleichen Zeile eine bestimmte Bedingung erfüllen.
Das funktioniert so lange, bis die Bedingung auf der zweitletzten Zeile und der letzten Zeile zutrifft. Dann wird die letzte Zeile nicht gel...
04.06.2013 12:06:44
Thread-ID: 1316229
4 Beiträge
VBA Zeilen verschieben wenn Bedingungen erfüllt
Jochen

Hallo zusammen,
ich habe hier ein Problem bei dem ich absolut nicht weiterkomme.
Ich habe eine Projektübersicht (Tabelle1) in Excel. Nun würde ich gerne wenn ein Projekt abgeschlossen ist, dieses komplett in ein Archivtabellenblatt (Tabelle2)verschieben.
In Spalte B habe ich die Pro...
04.07.2013 15:44:56
Thread-ID: 1321128
12 Beiträge
VBA Zeilen verschieben wenn Bedingungen erfüllt
Jochen

Hallo zusammen,
ich habe hier ein Problem bei dem ich absolut nicht weiterkomme.
Ich habe eine Projektübersicht (Tabelle1) in Excel. Nun würde ich gerne wenn ein Projekt abgeschlossen ist, dieses komplett in ein Archivtabellenblatt (Tabelle2)verschieben.
In Spalte B habe ich die Pro...
05.07.2013 08:50:01
Thread-ID: 1321225
5 Beiträge
Duplikate löschen wenn Bedingung erfüllt
Roger

Guten Tag,
Habe folgendes Makro aufgezeichnet.
ActiveSheet.Range("$A$1:$A$50000").RemoveDuplicates Columns:=1, Header:= _
xlYes
Funktioniert soweit.
Jedoch sollten nur Dublikate gelöscht werden, welche in der Spalte B (Formel hinterlegt) den Wert "" leer ausweisen.
Kann...
11.07.2013 09:48:24
Thread-ID: 1321984
2 Beiträge
Zeilen löschen, wenn Bedienung erfüllt ist?
Selma

Hallo Leute,
ich möchte in aktivem Arbeitsblatt (ab Zeile 2 bis letzte benutzte Zelle der Spalte A) die ZEILEN löschen, wenn in Spalte A, ...
• der Zellinhalt mit Schriftgröße 7.5 dargestellt ist
• der Zellinhalt mit Schriffarbe grün geschrieben ist
• der Zellinhalt mit Füllfarb...
08.01.2014 11:37:59
Thread-ID: 1344472
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
2
3
2
9
3
11
4
1
2
3
12
7
4
5
4
4
1
7
6
3
5
2
8
16