r = ActiveSheet.Range("A1048576").End(xlUp).Row returns zero

[billritz]

With 30K rows in sheet and none blank in column A, how could this return a zero to r?

 

[Alex Blakenburg]

How are you seeing that it is returning zero ?
Can you show us all the code ? (please use the VBA button when you post the code)

 

[Joe4]

Yeah, as Alex suggests, that should not be possible, as there is no row 0 on any Excel sheet!
Are you sure that you are not subtracting one from it or something? That could lead you to zero if if goes up to row one.
If that really is your result, then you most likely have some sort of logic or coding error. If you post your code, as Alex asked, we may be able to spot where the issue is.

BTW, instead of using:

r = Range("A1048576").End(xlUp).Row

I usually like to use this instead, which will also work on older versions of Excel that do not have that many rows (a more universal solution):

r = Cells(Rows.Count, "A").End(xlUp).Row

BTW, you do not have to preface your range with "ActiveSheet". If you leave the sheet reference off, it assumes and runs against the ActiveSheet.

​