IT编程技术

天行健，君子以自强不息；地势坤，君子以厚德载物；

ExcelVBA实战【第十三期】-获得指定列的最后一个非空单元格行号

2022-4-2 博主：Splendor EXCEL VBA实战

获得指定列的最后一个非空单元格行号

需求：有一列数据，用户使用行数不固定，如果你想获取这一列不为空的单元格数据，你就要做到不论使用者怎么追加数据你都可精确的知道这一列最后一个不为空的单元格行号是多少。 

Public Sub getLastRow()
    iLastRow = Range("A" & Rows.Count).End(xlUp).Row
    MsgBox "A列最后一行是：" & iLastRow
End Sub

语法：
Rows.Count：是先获取EXCEL里最大的行号,（扩展名是：xls时最大行数为65536，扩展名是：xlsx时最大行数为1048576）我们列子的扩展名是xlsx，所以此句得到是的1048576，也就是A1048576这个单元格

Range("A" & Rows.Count).End(xlUp).Row：此句红色部分的意思是A1048576最尾端，向上找到第一个不为空的单元格，反回它的row(行号)，本列中就是行16（如果此时用户又加了两条数据，那么他就会返回是18）

效果：（看不清点击放大观看)
5.gif

【Demo文件】
demo.xlsm



标签: ExcelVBA实战

« CSS第十节-CSS背景backgroud用法 | ExcelVBA实战【第十二期】-使用Goto方法选定单元格区域»