een gedeelte van bestand gebruiken in ander werkblad.

[toineke52]

Hallo,

ik wordt met het volgende geconfronteerd.

ik lees dagelijks een csv file, wat genereerd als rapportage wordt door een ander programma, in excel in.
Deze csv file varieert van 1000 tot soms wel6000 rijen
ik heb de onderste 28 regels nodig voor een specifieke rapportage.
het lukt me wel een macro met een absolute verwijzig te maken om deze 28 regels naar een nieuw tab blad te kopieren.
Maar omdat het aantal rijen zo varieert, moet dit eigenlijk met een relatieve verwijzig.
zodra ik dit zo defineer kopieert hij de gevraagde regels niet door.

Wat zie ik over het hoofd.
Weet iemand de oplossing

zie voorbeeld

Sub test()
'
' test Macro
'

'
Application.Goto Reference:="R100000C1"
Selection.End(xlUp).Select
ActiveCell.Offset(-28, 0).Rows("1:29").EntireRow.Select
ActiveCell.Activate
Selection.Copy
Sheets.Add After:=Sheets(Sheets.Count)
ActiveSheet.Paste
End Sub​

 

[Niels28]

Hoezo werkt het niet?
zo wel?

Sub test()
ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Offset(-27, 0).Resize(28, 1).Rows.EntireRow.Copy
Sheets.Add After:=Sheets(Sheets.Count)
ActiveSheet.Paste
Application.CutCopyMode = False
End Sub

Niels

 

[toineke52]

Bedankt