Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 14:07:03
Alternative Summewenn für Verlinkung closed Workbook
23.04.2024 13:44:37
Datum in Excelformel anzeigen
23.04.2024 13:31:41
alle Tabellblätter als csv exportieren - Verzeichnis wählen
23.04.2024 13:19:18
Daten aus externer Datei als Bereich übernehmen... ?
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
556to560
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
556to560
556to560
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeilen löschen

Zeilen löschen
02.02.2005 17:59:00
Dirk
Hallo Zusammen,
ich habe eine ziemlich lange Excel Tabelle mit Daten. Diese Tabelle soll nun in Spalte A nach Zahlenwerten aus einer anderen Liste durchsucht werden. Wenn dann eine Übereinstimmung gefunden wurde, soll die gesamte Zeile gelöscht die Tabelle aber bis zum Ende weiter nach dieser Zahl durchsucht werden. Abgeschlossen wäre der Vorgang dann, wenn die letzte Zahl der zweiten Liste abgearbeitet ist. Es befinden sich keine Leerzeilen in der Tabelle.
Excel 97 SR 2 bei Win XP.
Danke und Gruß
Dirk

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilen löschen
02.02.2005 18:14:55
Roland
Hallo Dirk,
mal als Ansatz:

Sub DoppelteRausAusTabelle1()
Dim i As Integer, j As Integer, lösch As Worksheet, prüf As Worksheet
Set lösch = Worksheets("Tabelle1")
Set prüf = Worksheets("Tabelle2")
For i = lösch.Range("A65536").End(xlUp).Row To 1 Step -1
For j = prüf.Range("A65536").End(xlUp).Row To 1 Step -1
If lösch.Range("A" & i).Value = prüf.Range("A" & j).Value Then lösch.Rows(i).Delete
Next
Next
Set lösch = Nothing
Set prüf = Nothing
End Sub

In der Recherche wirst du da noch eine Menge finden.
Gruß Roland
AW: Zeilen löschen
03.02.2005 00:48:18
Dirk
Hallo Roland,
das Makro liefert leider keinen Erfolg, leider auch die Recherche nicht.
Gruß
Dirk
Anzeige
AW: Zeilen löschen
03.02.2005 11:08:41
Roland
Hallo Dirk,
Wo klemmts denn konkret?
Gruß Roland

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige