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

你知道任何Excel VBA计数填充单元格的数量（文本/数字或文本+数字的组合）？ 我尝试了=countif(A2:A2000,1=1) （一般标准，例如1 = 1），但显示为零（0）的文本列。 如果您愿意，也可以在VBA中build议解决scheme。 谢谢。

Answer 1

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

Answer 2

在VBA中是WorksheetFunction.CountA（“A2：A2000”）

Answer 3

我想对于上面的答案，它应该是Application.WorksheetFunction.CountA（Range（“A2：A2000”））

我一直面临的问题，而不是提到范围，因为它认为整个范围是作为一个单位。

Answer 4

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