Nur bis zur letzten aktiven Zelle kopieren

[cekay]

Hey Community!

Ich habe vor mittels VBA mehrere unterschiedliche Spalten von einer Tabelle in eine andere Tabelle zu kopieren. Hierbei soll jedoch nur der gefüllte Bereich bzw. bis zu letzten aktiven Zelle kopieren werden. Wie mache ich dies nun?

Ich habe es bereits geschafft einen definierten Bereich zu kopieren:
Sheets("tbl1").Range("I1:P400").copy Sheets("tbl2").Range("K1:R400")


Wie kriege ich es nun hin, dass er nur bis zu aktiven Bereich kopiert und aber A2 dann kopiert?
Ich bin bereits auf ..End(xlUp) gestoßen, weiß nur nicht wie ich das einpflege

Beste Grüße

[gmg-cc]

Moin,
vielleicht hilft dir ja das hier: http://www.excel-ist-sexy.de/letzte-zeile-spalte-finden/

[cekay]

Hey, vielen Dank für die Antwort.

Leider komme ich nicht weiter. Ich hätte gedacht es ist auch ohne eine Function möglich.

Ist es in diese Richtung möglich/ richtig?
Sheets("tbl1").Range("A500").End(xlUp).Row.copy Sheets("tbl2").Range("A500").End(xlUp)