Application.worksheetfunction.counta(rng)

 ›  Application.worksheetfunction.counta(rng)