统计数据区域最后一行行号,可以说是入门VBA时最基础的一行代码,可以让你获取某列或者某一区域的最后一行的行号,本文给出7中不同的方法,得出数据区域最后一行行号,当然每种方法之间有些许差别。
工具/原料
-
OFFICE 2016(已打开“开发工具”选项卡)
方法/步骤
-
[第一种方法] ActiveSheet.Range("A" & Rows.Count).End (xlUp).Row
-
[第二种方法] ActiveSheet.Range("a1048576").End(xlUp).Row
如果是低版本的OFFICE用 ActiveSheet.Range("a65536").End(xlUp).Row
-
[第三种方法] ActiveSheet.Cells(Rows.Count,1).End(3).Row
-
[第四种方法] ActiveSheet.range("A1").CurrentRegion.Rows.Count
-
[第五种方法] ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row
-
[第六种方法] ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row
-
[第七种方法]
MaxRow =Application.Evaluate("=MAX((A1:A1048576<>"""")*ROW(1:1048576))")
-
上面7种方法,推荐的是前3种!!!
如果觉得这篇经验帮到了你,请点击下方的 “投票点赞" 或者“收藏”支持我!
还有疑问的话可以点击下方的 “我有疑问”,谢谢啦!