操作方法
打开Excel软件,确定原数据,插入表单控件。
ALT+F11打开VBA代码编辑器,输入如下的代码。
将表单控件指定到运行代码宏,点击运行,效果列中数据的最后一个单元格被选中。
分析VBA代码的含义。 Sub 找到最后的数据单元格() i = Worksheets("数据").Range("A65536").End(xlUp).Row Worksheets("数据").Range("a" & i).Select MsgBox "列中最后一个数据单元格找到了!" End Sub ------------------------------------------------------ 1.从A列的最后的最下面的单元格往上找,直到有数据的单元格,找到的是从下到上第一个有数据的单元格的行号Range("A65536").End(xlUp).Row 2.选择有数据的单元格Range("a" & i),单元格的表示方式 3.弹出提醒窗口,里面有提示内容 MsgBox "列中最后一个数据单元格找到了!"