nun aber noch eine andere Optimierungssache:
Ich will (nach einer Sortierung mit Schlüsselspalte 7) alle Zeilen (bis auf die jeweils erste) aus dem Tab löschen, die in Spalte 7 das Selbe stehen haben.
Auch das dauert leider sehr lange, geht das mit einem Trick schneller?
LG,
Tommi
HauptY = 150000
For y = HauptY To 2 Step -1
If Cells(y, 7) = Cells(y - 1, 7) Then Rows(y).Delete
Next y