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).Row2.选择有数据的单元格Range("a" & i)，单元格的表示方式3.弹出提醒窗口，里面有提示内容 MsgBox "列中最后一个数据单元格找到了！"
