小兔网

下面我们将看一个遍历定义范围的程序例如,当我们想对Range(“ A1:A3”)中的数字求平方时。您是否知道还可以在动态范围内循环

情况:

遍历Excel VBA中的定义范围

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

1.首先,我们声明两个Range对象。我们将Range对象称为rng和cell。

昏暗的 RNG 作为范围,电池作为范围

2.我们使用Range(“ A1:A3”)初始化Range对象rng。

设置 rng = Range(“ A1:A3”)

3.添加For Each Next循环。

对于 每个细胞 RNG

接着细胞

注意:这里随机选择rng和cell,您可以使用任何名称。请记住在其余代码中引用这些名称。

4.接下来,我们对这个范围内的每个单元进行平方。为此,请将以下代码行添加到循环中:

cell.Value = cell.Value * cell.Value

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

循环查看定义的范围结果

5.如果要检查随机选择范围内的每个单元格,只需替换:

设置 rng = Range(“ A1:A3”)

与:

设置 rng =选择

6.现在,例如,选择Range(“ A1:A2”)。

在Excel VBA中循环选择

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

遍历选择结果