遍历定义的范围在Excel VBA
下面我们就来看看,通过规定范围内循环的程序。
动态范围?现状:
将工作表上的一个命令按钮并添加以下代码行:
1.首先,我们声明两个Range对象。我们呼吁Range对象RNG以及细胞。
Dim rng As Range, cell As Range
2.我们初始化范围Range对象的RNG( “A1:A3”)。
Set rng = Range("A1:A3")
3.添加对于每个Next循环。
For Each cell In rng Next cell
注:RNG以及细胞随机选择了这里,你可以使用任何名字。
请记住,是指这些名字在你的代码的其余部分。
4.接着,我们方在该范围内的每个小区。为了实现这一点,下面的代码行添加到循环:
cell.Value = cell.Value * cell.Value
结果当您单击工作表上的命令按钮:
5.如果您要检查在随机选择的范围中的每个单元,只需更换:
Set rng = Range("A1:A3")
搭配:
Set rng = Selection
6.现在,例如选择Range( “A1:A2”)。
结果当您单击工作表上的命令按钮: