Wieder mal Zeilen kopieren mit VBA - Fehlermeldung

[Floxxwhite]

Hi, 

In der Beispieldatei habe ich versucht, alles was mit "done" markiert wurde in Tabelle2 zu kopieren.

Aus irgend einem Grund wird mir immer nur eine Zeile kopiert. 


Ziel soll es später sein, nach der Firma und nach dem Job Status Zeilenweise zu kopieren.


Komme hier aber momentan einfach nicht weiter. 



Das Makro soll dann Später auf eine viel größere Datei (ca. 30 MB) mit Daten angewendet werden. 
Hoffe das klappt. 




Für Tipps wäre ich dankbar!

[snb]

Code:

Sub M_snb()
    With Tabelle1.Cells(8, 4).CurrentRegion
       .AutoFilter 2, "done"
       .Copy Tabelle2.Cells(1)
       .AutoFilter
    End With
End Sub

[Floxxwhite]

Hi,

erstmal Danke. Im Beispiel funktioniert es Prima. In der eigentlichen Datei: 

Laufzeitfehler 424 - Objekt erforderlich. 


Eine Idee woran das liegen könnt?

Edit:
Habs geschafft, die Vortabelle kam aus UK. Die benutzen ja Sheet anstelle von Tabelle .... ich plödi.