Application.worksheetfunction.counta(selection)

 ›  Application.worksheetfunction.counta(selection)