excel中使用vba获得当前表格列最后个非空单元格
1、首先我们打开一个工作样表作为例子。
2、当我们的正在使用的工作表输入了非常多的数据的时候,我们就会难以寻找到表格列的最末尾,一般情况下我们不会见到数据达到几万条的表格,但是如果遇到了,又需要快速定位到末尾去怎么处理呢。
3、这里是做个比方,在该工作表内我们不确定哪个区域还有数据内容,但是我们可以用vba来快速寻找到该列需要定位的最后一个有数据的单元格。这里我们先使用alt+f11组合快捷键进入vbe编辑器,插入一个新的模块,并在模块中输入以下代码:
Option Explicit
Sub dingwei()
Dim rng As Range
Set rng = ActiveSheet.Range("a65536").End(xlUp)
rng.Activate
Set rng = Nothing
End Sub
4、这里我们应用的是end方法。它作用的对象是range("a65536")单元格,向上最后一个有数据的单元格。xlup即向上寻找有数据单元格的end参数。
5、因为我们把该单元格赋值给rng区域,所以这里激活它,就是跳转到该单元格。如图所示激活了a72这个单元格。
6、a65536这个序列号指的是excel最多拥有65536个列单元格,如果我们要选择查找其它列的最后一个有数据的单元格,只需要修改序列a为其它序列就可以了。
excel表格怎么利用vba自动填充公式?
excel中怎么使用vba绘制一个大头兔的图片?
excel怎么利用vba实现批量套打快递单批量打印单据?