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