计算列中的值的数量(值是文本格式的数字)

时间:2015-04-09 22:51:02

标签: vba excel-vba excel

我遇到了麻烦。

我正在编写一个从我们的大型机中提取值的宏。每次运行时,值的数量可能会发生变化。值是文本格式的数字。保持这种格式很重要,因为它们可以用于其他目的。不幸的是,由于我处理敏感数据,我无法发布我的代码,因为它是在工作笔记本电脑上。

基本上,代码通过值表旋转并将每个值拉到某个位置。在我的代码的最后,我想要COUNT来计算带有值的单元格数。记住这个值可能会改变,例如在我的第一次运行中我可以回退100个值,第二次运行可以回退1000个值。

在循环结束时,我考虑使用以下内容,但由于文本格式的值,我收到错误。

Application.WorksheetFunction.Count Range("D1:D7000")
Me.Cells(x,x) = Application.WorksheetFunction.Count Range("D1:D7000")

错误消息是

  

运行时错误1004

     

应用程序定义或对象定义错误

我知道它与格式有关,因为当我将值更改为文本时,它可以正常工作。

想法?

1 个答案:

答案 0 :(得分:1)

CountA可能就是您所需要的。它计算非空单元格,而Count计数包含数字的单元格