Copy/Paste Range with Unknown End Point

[amyxkatexx]

Okay, so I have a sheet that I need to be able to copy the information from Columns B through CC and paste them into another workbook in columns A through CB in row 2.

The first 7 rows are headers, so if there are 5 lines of data, the Range to copy would be B8:CC12. So the only unknown is the number of rows in column CC.

Can I write a macro that will find the last row of data on the sheet and use the number of that row in the range to copy?

Any advice would be greatly appreciated.

Thanks in advance!

-Amy Kate

[Palmetto]

Can I write a macro that will find the last row of data on the sheet and use the number of that row in the range to copy?

Something along these lines, adjust sheet reference as required:

Dim lrow As Long

lrow = Sheet1.Cells(lrow, "CC").End(xlUp).Row

range("B8:CC" & lrow).Copy

[Kafrin]

Try something like:

Dim C As Range

Set C = Range("B:CC").SpecialCells(xlLastCell)

'put the rest of your code here

The in your copy range you want something like Range("B8:CC" & C.Row)

[amyxkatexx]

Ah, you rock!

Thanks!