Excel VBA - Zeile aus einem Blatt kopieren und in anders Blatt einfügen

gehtnetgibtsnet

Cadet 4th Year
Registriert
März 2019
Beiträge
124
Hallo Forum.

Ich möchte eine bestimmte Zeile aus einer bestimmten Tabelle kopieren und diese Zeile dann in eine andere Tabelle am Ende einfügen.
Die Zeilen-Nummer die kopiert werden soll, ist in der Variable "vonZeile", die Ziel-Zeilen-Nummer in "nachZeile". Und die Anzahl der Spalten ist in der Variablen "Spalten". Nennen wir die beiden Tabellen einfach "VonTab" und "NachTab".

Problem: das Ganze soll ohne Select funktionieren, auch dann, wenn gerade eine ganz andere Tabelle aktiv ist.

Wer kann helfen?
 
Würde das irgendwie so lösen:

Code:
    Dim VonRange As Range: Set VonRange = VonTab.Range(VonTab.Cells(vonZeile, 1), VonTab.Cells(vonZeile, Spalten))
    Dim NachRange As Range: Set NachRange = NachTab.Range(NachTab.Cells(nachZeile, 1), NachTab.Cells(nachZeile, Spalten))
    NachRange.Value = VonRange.Value
 
Zurück
Oben