Range kopieren über VBA
09.03.2005 15:22:20
Torsten
mit
Sub PCA_Copy()
Range(Cells(2, ActiveCell.Column), Cells(200, ActiveCell.Column)).Copy
End Sub
kopiere ich den Range von Zeile 2 bis 200 der Spalte, in der sich der Cursor gerade befindet. Jetzt möchte ich den Code so umgestalten, daß
- unabhängig von der Position des Cursors
- die Anzahl der Zeilen in Spalte A gezählt werden
- der Range (A2:D'letzte Zeile aus Anzahl der Zeilen')
kopiert wird.
Das ist leider etwas viel für mich auf einmal. Könnt Ihr mir unter die Arme greifen. Vielen Dank schon mal im voraus.
Gruß
Torsten
Anzeige