ich habe ein Tabelle "1" nach Spalte F sortiert. Es soll nun eine Abfrage gemacht werden, wo alle zeilen Start zeile 1 in das tabellenblatt "92" kopiert werden solange die Spalte F Tabelle "1" nicht leer ist. ich bekomms einfach nicht hin.
Sub Kopieren()
Dim WS1 As Worksheet, WS2 As Worksheet
Set WS1 = Worksheets("Tabelle1")
Set WS2 = Worksheets("Tabelle92")
WS1.Range("A1:IV" & WS1.Range("F65536").End(xlUp).Row).Copy WS2.Range("A1")
End Sub