Cut and Paste Last Fourteen Rows

[Gos-C]

Hi all,

I have several similarly formatted daily reports with a detailed upper section and a 14-row summary lower section. Currently, I have to manually format them to print on letter size paper - which is very time consuming.

I need to cut and paste the summary section to a new sheet, and then repeat the Row 4 column header on all the pages for the detailed section. (I think I would be able to add the column widths and other formats.)

Can someone please help me with some codes.

Thank you very much,
Gos-C

[Marcol]

This might give you a start.

Please Login or Register  to view this content.

[Gos-C]

Hi Marcol,

Very good start! Thank you.

To clarify, the headers are in row 4 and are for the detailed section if it cannot fit on one pages. So, I need the code to add the headers on any subsequent page (currently, those pages do not show the headers).

Sheet2 does not exist - the reports come with just one sheet.

Also, is my substitution to find the last row a safer bet?

Please Login or Register  to view this content.

[Gos-C]

Hi all,

Together with Marcol's code and another one that I found

, here is my solution:

Please Login or Register  to view this content.

Please Login or Register  to view this content.

It works perfectly!

Thank you, Marcol.

Regards,
Gos-C

[Marcol]

I would use the code I gave you for LastRow

Please Login or Register  to view this content.

Change the column letter, as required,to a known column that will always have data for the last required row.
This is more controllable than using the Find method, that finds the last used row in the sheet.

Let's say that we know that column "A" will always contain the last row of relevant data and there are no more irrelevant entries in that column, and for example that row is 20.

If there is unrequired data in say Range("C25"), let's say a footnote you don't need to copy,or indeed seems to be empty but actually has a string of spaces ,

Please Login or Register  to view this content.

will return 20

Please Login or Register  to view this content.

will return 25

[Gos-C]

Valid point! I will do that. Thank you, Marcol.

Gos-C