“Cuenta de filas de Excel” Código de respuesta

Cuenta de filas de Excel

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