专栏名称: 完美Excel

Excel与VBA技术学习与实践

再谈查找最后使用的行或列

完美Excel · 公众号 · Excel · 2024-11-06 06:00

正文

学习Excel技术，关注微信公众号：

excelperfect

标签：VBA

在VBA中，经常会遇到要找到已使用的最后一行或最后一列，这样就能够确定已使用的有数据的单元格区域，便于进行下一步的操作。

关于查找最后使用的行或列，之前有多篇文章讲解过，下面再重温一下经典的方法。

我们知道，工作表对象有一个UsedRange的属性，可以返回工作表中已使用的区域，例如：

Set Rng = ActiveSheet.UsedRange

将当前工作表中已使用的单元格赋值给变量rng。

要找到当前工作表中最后使用的行的行号，可以使用下面的代码：

lngLastRow = ActiveSheet.UsedRange.Rows(ActiveSheet.UsedRange.Rows.Count).Row

注意，仅使用下面的代码：

ActiveSheet.UsedRange.Rows.Count

会得到不正确的结果。因为数据块不一定是从第1行开始的。

同理，下面的代码找到当前工作表中最后使用的列的列号：

lngLastColumn = ActiveSheet.UsedRange.Columns(ActiveSheet.UsedRange.Columns.Count).Column

也可以使用Find方法来查找最后一行或列。

查找并获取最后一行的行号：

lngLastRow = Cells.Find("*", , xlValues, , xlRows, xlPrevious).Row

查找并获取最后一列的列号：

lngLastColumn = Cells.Find("*", , xlValues, , xlByColumns, xlPrevious).Column

注意，上述代码行将返回可见值的行和列，无论这些值是常量还是公式结果。如果最后一行是由公式返回的值且返回的是空字符串（””），此时想找到最后一行或最后一列，需将代码行中的常量xlValues更改为xlFormulas。

欢迎在下面留言，完善本文内容，让更多的人学到更完美的知识。

欢迎到知识星球：完美Excel社群，进行技术交流和提问，获取更多电子资料，并通过社群加入专门的微信讨论群，更方便交流。

推荐文章

Excel之家ExcelHome · 几个高效Excel公式的典型应用

3 天前

Excel之家ExcelHome · 数据填充的8个典型应用，全都会的请举手

4 天前

完美Excel · 限制Excel工作表滚动区域

5 天前

Excel之家ExcelHome · 几个常用Excel公式，简单又高效

5 天前

完美Excel · 使用VBA添加图表

1 周前

大家-腾讯新闻 · 顾则徐：塞外最后的喜歌手

7 年前

娱乐圈头条 · 你的清纯度还剩多少？敢测测么？

7 年前

晚安少年 · VOL.692 最纯粹的爱情观

7 年前

新街派生活报 · 回家试试 | 简单一招，自己动手测测家里酱油好坏？【生活实验室】

7 年前

价值投资 · 做好投资我们只要学会一件事——分辨价格和价值

7 年前