excel - 为什么没有值时我的小计代码计数为 1？

Question

所以我正在运行一个代码来过滤我的数据，然后计算数据并将其插入到 Excel 文件中。我正在使用此代码来计算数据:

lastrow = Cells(Rows.count, "A").End(xlUp).Row
count = Application.WorksheetFunction.Subtotal(3, Range("A2:A" & lastrow))

出于某种原因，当我过滤了我的数据以便除了位于第 1 行的顶行之外没有可见值时，它给我的值是 1 而不是 0。任何想法为什么这样做？

谢谢

Answer 1

这实际上是我不久前发现的一件有趣的事情。发生的情况是，A 列为空白(或仅过滤为空白)，lastrow = 1 ，这意味着您要小计的范围是 Range("A2:A1") .

例如，测试:

Debug.Print Application.WorksheetFunction.Subtotal(3, Range("A2:A1"))