Считается Excel Rows

Application.WorksheetFunction.Subtotal(3, Range("A2:A500000"))
Embarrassed Eel