Rows.Count Returns 1M+ Rows

[goss]

Hi all,

Using Excel 2010.

My Rows.Count continues to return 1,048,576 after initial import from csv
I subsequently deleted everything below row 100,003, but Rows.Count continues to return the 1M+. I highlighted the rows that have nothing in them and cleared all. Still 1M+ rows

I tried saving and re-opening the file. Same result.
How can I get the correct value of 100,003?

 

[wigi]

Rows.Count is the number of rows in an Excel 2007 and 2010 spreadsheet.

What you need is ActiveSheet.UsedRange.Rows.Count

 

[goss]

Thanks Wigi,

Too much Excel today - time to take a break.
Here is my final snippet. Returns 100,003

lngRows = ws.Cells(Rows.Count, 1).End(xlUp).Row

 

[wigi]

Or better:

lngRows = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row