得到最后数据的行数

说明

在编写代码时我们时常用到的是: 取得数据表的最后一行数据所在的行号?这样在编写循环语句时就不用猜着自定义终止值?

代码 code

Dim FinalRow As Integer
FinalRow = Range("A65536").End(xlUp).Row '得到A列最后数据的行数

解析

自A65536单元格开始向上询查，A列第一个有内容的单元格所在的行号。

拓展

如果A列或B列或C列等列行数不同，就可以将A65536修改为B65536或C65536等，以获取不同列的最后一行数据所在行号；同理，如果数据的行数已经大于65536行，则可以相应的调增65536这个值，以便适应。当然一般情况下这个值就足够大了。