mein Problem:
ich möchte aus einer Datei x Sheet(1) - Zeilen ab einem Wert von 1000 in Spalte A - kopieren und in der Tabelle 2 einfügen.
Kann mir jemand helfen
Gruß
Uwe
zielzeile = 1
for z = 1 to 100
if cells(z,"A") >1000 then
rows.copy Sheets(Ziel).Range(Zielzeile)
Zielzeile = Zielzeile +1
end if
next z
Die Ziele musst du natürlich anpassen...