Excel / VBA - 计算范围内已填充单元格的数量

时间:2013-01-09 20:04:28

标签: excel vba

您是否知道任何计算已填充单元格数量的Excel VBA(包含文本/数字或文本组合+数字)? 我尝试=countif(A2:A2000,1=1)(使用一般标准,例如总是1 = 1)但是对于文本列显示为零(0)。如果您愿意,也可以在VBA中推荐解决方案。谢谢。

4 个答案:

答案 0 :(得分:7)

我认为上面的答案应该是

Application.WorksheetFunction.CountA(Range("A2:A2000"))

我一直遇到问题而没有提及Range,因为它认为整个范围都是一个单位。

答案 1 :(得分:5)

在VBA中,它是WorksheetFunction.CountA(“A2:A2000”)

答案 2 :(得分:3)

公式为=COUNTA(A2:A2000):计算非空白单元格。

答案 3 :(得分:0)

Dim Coloumncount As Integer  Coloumncount = Application.WorksheetFunction.CountA([D1:D100])'计算coloumn“D”中填充的单元格数