获取指定行列最后一个非空单元格
1、到达对象所在区域的边缘
在“A1:H16”的数据中,如何一步到达单元格所在行的最下、上、左、右端,有以下几种方式:
【Crtl】+↑:到达该列数据的最上端单元格,其余箭头功能类似。将鼠标点在所选中单元格上边框出,待鼠标形状显示为四周带箭头形状时双击即可到达最上端。使用VBA中的End属性。
Sub test1()Sheet1.Range("a1").End(xlDown).Select '选中该数据源中第一列最下面一个单元格Sheet1.Range("a3").End(xlUp).Select '选中该数据源中第一列最上面一个单元格End Sub
2、选中数据的最下面单元格
上面已经介绍了一种方法,即用end(xldown)
进行选择,但是在实际工作中,可能出现第一列中间某一行没有数据的现象,此时将会定位到空白处而不是最后一行,此时可以逆向思维考虑,从下向上进行选择。
Sub test2()Sheet1.Range("a1048576").End(xlUp).Select '1048576为Excel中最大的行数,当然只要数足够大即可End Sub