Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
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
504to508
504to508
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

zeilen nach krieterien löschen

Forumthread: zeilen nach krieterien löschen

zeilen nach krieterien löschen
25.10.2004 21:09:18
Lucas
Hallo an alle,
habe folgendes Problem
habe 4 spalten a bis d möchte jedoch einige zeilen nach kriterien löschen will jedoch die 8 krieterien in die spalte g unteneinander schreiben gibst es eine möglichkeit das das makro sich die krieterien in spalte g sich anschaut und dem entsprechend die spalte b kontrolliert und alle zeilen löscht die diese krieterien haben
wäre bitte dringend.
danke
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: zeilen nach kriterien löschen
ypsilon
hi Lucas,
möglich ist das schon aber du müsstest ein paar mehr infos rausrücken ;-)
welche kriterien sollen in welcher spalte zum einsatz kommen
cu Micha
AW: zeilen nach kriterien löschen
25.10.2004 21:19:25
Lucas
Hi mica
wenn folgende worte in spalte b gefunden ( geld, wäscherei, auto usw... )werden müssten die komplette zeile gelöscht werden
hatte mir gedacht diese wörter in spalte g unterainander zu schreiben da jederzeit andere krieterien zukommen oder ändern würden
danke dir
Anzeige
AW: zeilen nach kriterien löschen
yps
hi Lucas,
probier mal:

Sub loeschen()
Dim zeile As Long
Dim zaehler As Integer
Dim arr(7)
ScreenUpdating = False
For zaehler = 0 To 7
arr(zaehler) = Cells(zaehler + 1, 7).Value
Next zaehler
For zeile = [B65536].End(xlUp).Row To 1 Step -1
For zaehler = 0 To 7
If InStr(Cells(zeile, 2).Value, arr(zaehler)) > 0 And arr(zaehler) <> "" Then Rows(zeile).Delete: Exit For
Next zaehler
Next zeile
ScreenUpdating = True
End Sub

cu Micha
Anzeige
AW: zeilen nach kriterien löschen
25.10.2004 22:30:47
Lucas
Hallo Mica,
vielen dank hat alles super geklappt danke
danke dir auch Karl-Otto
gruss
AW: zeilen nach krieterien löschen
Karl-Otto
Hallo Lucas
Vielleicht schaust Du 'mal 5 Threads weiter unten.
(Die Kriterien solltest Du woanders hinschreiben)
Gruß
KO
AW: zeilen nach krieterien löschen
yps
hi Karl-Otto,
wenn er sie jedesmal neu eingeben will kann er sie durchaus in spalte g lassen ;-)
cu Micha
Anzeige
;

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