Hallo,
da würde ich eine Hilfsspalte machen, die ermittelt, ob eine Zeile gelöscht werden muss.
z. B. =WENN(ISTZAHL(VERGLEICH(ZellemitZahl;Bereich_mit_zu_löschenden_Zahlen;0));"X";"")
Dann filterst Du die X und löscht die Zeilen. Falls es sehr viele nicht zusammenhängende Zeilen sind, würde ich vorher noch nach dem X sortieren.
Zu Deinem Makro:
1) Du musst von unten anfangen zu löschen, da sich ja die Zeilen nach dem löschen nach oben verschieben
2) Einzelne Zeilen zu löschen ist sehr langsam. Daher sollte man auch per Makro die oben skizzierte Vorgehensweise "nachbilden".
Grüße
Michael
|