Excel中利用VBA编程获取某列最后非空行行号

Excel中利用VBA编程获取某列最后非空行行号，今天就教大家如何操作使用方法步骤。

材料/工具

电脑

方法

步骤1

制作表格。

步骤2

按“Alt+F11”进入VBA编程环境，右击“Microsoft Excel对象”，选择“插入”->“模块”。

步骤3

输入如图所示的代码：
Sub 显示某列非空行的行号()
Dim i, j As Integer
i = Sheets(1).[A65535].End(xlUp).Row
j = Sheets(1).[B65535].End(xlUp).Row
MsgBox "A列中非空行行号为" & i & Chr(10) & "B列中非空行行号为" & j, vbOKOnly, "提示"
End Sub

步骤4

点击“运行子过程”，在弹出的窗口中点击“运行”。

步骤5

即可看到运行结果。

---

声明本文系本人根据真实经历原创，未经许可，请勿转载。