lastrow?

[dasadler]

I am trying to enter the row number of the last row of data in a worksheet in cell A LASTROW+1 and I keep getting an error. What am I doing wrong?

Dim LastRow As Long

LastRow = Range("A65536").End(xlUp).Row

range("A"lastrow+1).value=lastrow

[StuartR]

Try putting an Ampersand between "A" and lastrow+1 so that it reads
Range("A" & LastRow + 1).Value=LastRow

[dasadler]

Thanks a lot - perfect! Now I can focus on looping through rows until I reach lastrow. Love this stuff (almost always).

[sdckapr]

Instead of:
LastRow = Range("A65536").End(xlUp).Row

You may want to change to:
Lastrow = cells(activesheet.rows.count,1).end(xlup).row

Yours will work for versions of XL before XL2007, but may not give the right value for workbooks starting with XL2007 since row 65536 is no longer the last row. The variant is more general and will work with any version since it determines the last row of the worksheet at runtime.

This will prevent issues when you do upgrade and have larger datasets.
Steve

[dasadler]

Good point Steve, change made. Thank you.