Excel VBA：函数来计算数组的非空元素

我正在寻找一种方法来计算2维数组中的非空元素。

我已经在这里读了一个解决schemeVBA计数非空元素的数组 。 不过，我认为可能有更好的方法或function来执行它。

要计算范围（A1：J10）中的非空单元格，我们在Excel VBA中使用此单元格

k = Application.WorksheetFunction.CountA(Range(Cells(1, 1), Cells(10, 10))) 

我正在寻找类似的function来计算数组中的非空元素。 例如，我试过这个

  k = Application.WorksheetFunction.CountA(Array(1,1),Array(10,10)) 

但它不起作用。 有这样的函数来计算数组中的非空元素吗？

我需要计算这个数字，因为当数组中相同行的所有元素都为空时，我想删除数组中的整个行。

谢谢。

Answer 1

AFAIK没有内置的function为您的要求。