Ich benötige mal wieder Eure Hilfe.
Folgende Ausgangssituation:
In Tabelle1 SpalteA stehen Projektnummern die 1x, doppelt aber auch mehrfach vorhanden sein können.
In den Spalten C und D stehen die entsprechenden Werte dazu.
In Tabelle2 SpalteB stehen dann Projektnummern (eindeutig und nur einmal vorhanden)
Jetzt möchte ich gern über ein Makro realisieren das die in Tabelle1 in der Spalte A stehenden Projektnummern mit den Projektnummern welche in der Tabelle2 Spalte B stehen verglichen werden.
Es sollen alle ZEILEN (Datensätze) in Tabelle1 komplett gelöscht werden wenn deren Projektnummern in Tabelle2 Spalte B NICHT vorhanden sind.
Folgender Hintergrund: In Tabelle1 sind ca. 248.000 Zeilen (Datensätze) die anschließend durch SVERWEIS oder wie ich es bereits gelöst habe
'=WENNFEHLER(AGGREGAT(15;6;Tabelle1!$C$2:$C$165386/($B5&C$4=Tabelle1!$A$2:$A165386&Tabelle1!$B$2:$B$165386);1);"")
In Tabelle2 aufbereitet und eingelesen werden sollen.
Ich musste schon die automatische Berechnung in Excel deaktiviern und auf manuelle Berechnung umschalten weil die Aktualisierung sonst ewig gedauert hätte.
Selbst bei der manuellen Berechnung wenn ich die Datei speichere dauert der Vorgang mehre Minuten (20- über 40 min.) um die große Datenmenge abzuarbeiten.
Jetzt würde ich gern die Datensätze in Tabelle1 auf ein Minium reduzieren.
Dabei sollen ALLE ZEILEN komplett gelöscht werden deren Projektnummern NICHT in Tabelle2 Spalte B vorhanden sind
Wenn in Tabelle1 Spalte A die Projektnummer (welche auch immer mehrmals vorkommen kann) weil dies auch so gewollt ist, in Tabelle2 Spalte B auch vorhanden ist sollen diese aber alle bestehen bleiben.
Also wirklich nur die Zeilen in Tabelle1 löschen deren Projektnummern nicht in Tabelle2 Spalte B vorhanden sind
Ich habe mal eine absolut abgespeckte Datei mit hochgeladen wie das am Ende aussehen soll.
Originaldatei hat im xlsx Format ca. 53 MB und in Tabelle1 ca. 248.000 Datensätze
Ich hoffe das ich das einigermaßen verständlich rüber gebracht habe wie ich das gern haben würde.
Vielleicht kann mir einer von Euch dazu einen Code schreiben der mir die ZEILEN automatisch löscht.
Habe bei meinen Recherchen im Internet nicht wirklich passendes dazu gefunden.
hier noch meine Datei dazu:
https://www.herber.de/bbs/user/139612.xlsb
Danke bereits im Voraus für Eure Unterstützung
Gruß Andreas