设置主页 | 收藏本站 Excel学习网-公益型的EXCEL在线学习网站,助您轻松办公!

Excel怎么快速定位列最后一个非空单元格

2021年01月02日 18:47 发布来源:Excel学习网

 当处理Excel数据表时,有时需要快速找到某列的最后一个非空白元格,这通常是在编写VBA程序时使用Range对象的End属性来实现的。下面就是小编带给你的Excel快速定位栏的最后一个非空白元格,希望能对你有所帮助。

Excel怎么快速定位列最后一个非空单元格

启动Excel并打开VisualBasic编辑器,将模块插入到工程资源管理器,将程序代码输入到模块的“代码”窗口,如图1所示。该函数实现的具体程序代码如下:
SubtoLastRow()
DimcAsRange
Setc=ActiveSheet.Range("A65536").End(xlUp)
MsgBox"A列最后一个非空单元格为:"&c.Address
c.Activate
EndSub
图1 添加模块并编写程序
提示
在ExcelVBA中,End属性将返回一个Range对象,该对象表示区域尾端单元格,其中包含指定的Range对象为多单元格区域时左上角的单元格。在程序中,使用Range对象的End属性获取A列的最后一个非空白元格,然后将它赋予变量c。
2、按F5键运行该过程,程序给出提示对话框,提示最后一个非空单元格的地址,如图2所示。单击“确定”按钮关闭对话框后,程序将定位到该单元格,如图3所示。
Excel怎么快速定位列最后一个非空单元格
图2 程序给出提示
原创文章如转载请注明:转载自Excel学习网 [ http://www.excelcn.com/]
需要保留本文链接地址:http://www.excelcn.com/jiqiao/13030.html
分享到:
网站地图 | XML地图 | 免责声明 | 关于我们 | Excel学习网:优秀的EXCEL在线学习和资源分享网站。
版权所有: CopyRight © 2013-2018 www.excelcn.com All Rights Reserved.
豫ICP备12002644号