Bereich mittels VBA kopieren
16.03.2004 19:20:00
Christian
ich habe ein Problem, mit welchen ich per Makro-Recorder nicht zu Lösung komme.
Ich möchte Teile einer variablen Tabelle kopieren, um diese später in eine andere Tabelle zu kopieren.
Der Tabellenbeginn (Spalte A, Zeile 4) ist immer gleich. Die letzte Zeile wird per "LastRow = ActiveSheet.UsedRange.Row + ActiveSheet.UsedRange.Rows.Count - 1" eingelesen. Letzte Spalte per "LastColumn = Cells(4, Columns.Count).End(xlToLeft).Column".
Ich möchte auf ein Mal kopieren:
Spalte A, Zeile 4 bis LastRow
Spalte B, Zeile 4 bis LastRow
Spalte LastColumn, Zeile 4 bis LastRow
Nehmen wir an LastRow = 20 und LastColumn = 10 (also Spalte J), dann brauche ich sowas wie "Range("A4:B20,J4:J20").Select" und anschließend "Selection.Copy".
Welcher Experte bekommt das mit dem Select hin? Ich vermute das ist irgendein anderer Befehl wie Cells(X,Y).Select, aber mir fehlt der Weg dorthin.....
Danke und Gruß
Christian