1、打开Excel软件，确定原数据，插入表单控件。
2、ALT+F11打开VBA代码编辑器，输入如下的代码。
3、将表单控件指定到运行代码宏，点击运行，效果列中数据的最后一个单元格被选中。
4、分析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 "列中最后一个数据单元格找到了！"
