Regels selecteren tbv copy/paste

[jansm]

Heren,
ik gebruik een csv-bestand met een "kop" in de eerste regel en data in de volgende regel(s). Het aantal volgende data regels varieert van 1 tot ca 400. Met een macro selecteer ik alle regels vanaf regels 2 tot de laatste. Dan de bewerking copy/paste naar een andere file.

Rows("2:2").Select
Range(Selection, Selection.End(xlDown)).Select

Dat selecteren gaat goed zo lang er meer dan 2 dataregels zijn. Is er maar 1 data-regel (dus alleen regelnr 2) dan worden de regels tot 1048546 geselecteerd.
Zie voorbeeld. Delete regels 3-21 en voor de code uit.

mvg, jansm

 

[Cobbe]

Test deze eens:

Rows("2:" & ActiveSheet.UsedRange.Rows.Count).Copy

 

[jansm]

Cobbe, hij doet het. Erg bedankt.
Mvg, Jansm