Hi

something like

Code:
msgbox selection.cells.count=worksheetfunction.counta(selection)