图示EXCEL表格vba系列19之End(xlDown)用法简介

1、首先需要简单将单元格的格式写好，以便可以简单说明代码的用处，如下图所示：

2、为了能够将单元格向下按钮点击后可以执行测试代码，需要将按钮指定到模块一中，如下所示：

1、其次需要编写代码，代码编写如下图所示：

2、代码编写：Sheet1.Range("B2") = Sheet1.Range("A1").End(xlDown)

3、代码中的显示意义是将Sheet1.Range("A1").End(xlDown)的结果，显示到表格一中的单元格B2中，如下图所示：

1、为了能够将Sheet1.Range("A1").End(xlDown)结果可以显示，在这句代码中添加为End(xlDown).Row更改后代码如下图所示：

2、接下来就是点击按钮，执行代码，将代码显示的结果如下图所示：

3、如上图显示的结果，可以得出在单元格B2中显示的结果为表格所有的行列，如下图所示：

4、简单总结一下，End(xlDown)是向下寻找，当然是选择非空的单元格， 为了能够空单元格中显示结果，在后面加入Row,也就是显示一直向下的行数，（ps：EXCEL2007行数为1048576）