WorksheetFunction.CountA (Excel)
Counts the number of cells that are not empty and the values within the list of arguments.
Use CountA to count the number of cells that contain data in a range or array. A value is any type of information, including error values and empty text (""). A value does not include empty cells. If an argument is an array or reference, only values in that array or reference are used. Empty cells and text values in the array or reference are ignored. If you do not need to count logical values, text, or error values, use the Count function.
CountA (Arg1, Arg2, ..., Arg30)
Dim dblCountA As Double
dblCountA = WorksheetFunction.CountA(Arg1:=)