遍历整个列

下面我们将看一下Excel VBA中的一个程序，该程序在整个第一列中循环并为所有低于某个特定值的值着色。

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

1.首先，声明一个名为Long的变量i。我们在这里使用Long类型的变量，因为Long变量比Integer变量具有更大的容量。

2.接下来，添加代码行，它将A列中所有单元格的字体颜色更改为黑色。

3.添加循环。

注意：在Excel 2007或更高版本中，工作表最多可以有1,048,576行。无论使用什么版本，上面的代码行都会遍历所有行。

4.接下来，我们为所有小于输入到单元格D2中的值的值上色。空单元格将被忽略。将以下代码行添加到循环中。

单击工作表上的命令按钮时的结果（这可能需要一段时间）：