下面我们将看一个遍历定义范围的程序。例如,当我们想对Range(“ A1:A3”)中的数字求平方时。您是否知道还可以在动态范围内循环?
情况:
在您的工作表上放置一个命令按钮,并添加以下代码行:
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”)。
单击工作表上的命令按钮时的结果: