VBA如何计算行数？

Question

NumOfRows = ActiveSheet.Range("A1").Offset(ActiveSheet.Rows.Count - 1, 0).End(xlUp).Row

我想知道这个命令究竟是如何计算行数的？ 我想逐行理解。

Answer 1

翻译可以如下：

Activesheet goto cell A1下一步向下移动number of all rows in sheet minus 1但keep the same column (0)下一个move up to first not empty cell in column 0（假设最后一个单元格为空）并获取行你搬家的牢房。

因此，此代码不会返回ROWS的数量，而是返回您已移动的SINGLE ROW的数量。但它似乎与数据表的行数相同，如果这样的表在单元格A1中开始并且是连续向下的方向。

BTW，您的代码的更受欢迎的版本就是这个：

NumOfRows = ActiveSheet.Cells(ActiveSheet.Rows.Count, 1).End(xlUp).Row

你得到相同的结果。