从活动单元到最后一个条目

本示例说明了Excel VBA中 Range对象的End属性。我们将使用此属性选择从活动单元格到列中最后一个条目的范围。

情况：

A列中的一些销售数字。假设随着时间的推移您将添加更多的销售数字。

在您的工作表上放置一个命令按钮，并添加以下代码行：

1.要选择列中的最后一个条目，只需添加以下代码行：

注意：除了Range（“ A5”），还可以使用Range（“ A1”），Range（“ A2”）等。此代码行等效于按END + DOWN ARROW。

单击工作表上的命令按钮时的结果：

2.要选择从单元格A5到列中最后一个条目的范围，请添加以下代码行：

单击工作表上的命令按钮时的结果：

3.要选择从活动单元格到列中最后一个条目的范围，只需用ActiveCell替换Range（“ A5”）。

当您选择单元格A2并单击工作表上的命令按钮时，结果：

注意：可以使用常量xlUp，xlToRight和xlToLeft在其他方向上移动。这样，您可以选择从活动单元格到行中最后一个条目的范围。