如何计算excel表格中一列中的填充单元的数量

所以我目前正在尝试计算excel表格中列的填充单元的数量，但我不确定如何做到这一点。 我看过像这样的东西：

Range("A1").End(xlDown).Row 

但是这并没有给出实际的数字。 有谁知道如何获得一个整数值计数？ 有没有为此目的build立到Excel中的任何方法？

提前致谢。

Answer 1

计数function可以工作。

 'If the data is in column A Dim lngCount as Long lngCount = Application.WorksheetFunction.CountA(Columns(1)) msgbox lngCount 

Answer 2

你也可以循环遍历单元格区域，我不知道哪个方法更快 – 这个或者使用Excel的CountA（如果r范围是整列，下面会进入几乎无限循环）：

 Sub test() Dim r As Range Dim c As Long Set r = Range("A1").End(xlDown).Row For Each x In r If Not r = "" Then c = c + 1 End If Next r MsgBox r End Sub