VBA代码0001:选中一列中有内容的最后一个单元格

1、进入EXCEL,在任意的一列中输入数据。

2、同时按下ALT+F11，打开VBA代码编辑器。

3、在VBA代码编辑器SHEET1中输入如下VBA代码：Sub Macro1()Wor氯短赤亻ksheets("sheet1").Range("a1").End(xlDown).SelectEnd Sub

4、在sheet1工作表中插入表单控件，并指定定到宏，宏名称为Macro1

5、按下表单控件按钮，A列中的有数据的最后一个单元格就处于选中状态了，可以在最后一个单元格下面再添加数据，再点击表单控件，选中的单元格就发生了变化。

6、解释VBA代码的含义：Sub：命名，定义怡觎现喾Macro1：宏的名称Worksheets("sheet1")：工作边表1Range("稆糨孝汶;a1")：第一列中的A1单元格End(xlDown)：向下有内容到最后一个单元格Select ：选中End Sub：结束定义，命名总体的含义：命名一个宏，选中工作表1，从A1起向下到最后一个有内容单元格选中，结束宏。