Excel VBA中for循环语句的用法

Posted 2023-03-16

参考技术A Excel VBA中for循环语句是怎样用的？下面我们来看一下。

我们先创建一个空的函数。

在函数体里，就可以创建一个for循环了，使用ForNext的结构，其中J变量就是定义的循环次数，从1到20，则表示循环20次。

循环做什么操作呢？可以在for里写上对应的逻辑，这里就是设置单元格(Cells）的值。

我们执行这个函数，看下效果。

可以看到在B列里的前20个单元格，都设置值了。为什么是B列，因为Cells函数是第二个参数是2，就是第二列。

vba中五种循环语句的区别

vba中五种循环语句的区别

参考技术A 1、For
……Next
语句，适用于顺序操作
例1.在立即窗口输出1到100
For
n=1
to
100
'从1到100
，执行下行代码
debug.Print
n
next
n
2、For……Each……Next语句，适用于集合的操作
例2.输出指定单元格区域所有单元格的内容
For
Each
Cell
in
myRange
'遍历区域内的所有单元格
debug.Print
Cell.Value
next
Cell
3、Do
While
条件
……Loop
语句。
例3、在立即窗口输出1到100
n=0
Do
While
n<=100'当n小于等于100时
，执行下行代码，否则退出
n=n
1
Debug.Print
n
Loop
4、While
条件……
Wend
语句。
例4、在立即窗口输出1到100
n=0
While
n<=100'当n小于等于100时
，执行下行代码，否则退出
n=n
1
Debug.Print
n
Wend
5、Do
……Loop
Until
条件
语句。
例5、在立即窗口输出1到100
n=0
Do
'执行下行代码
n=n
1
Debug.Print
n
Loop
Until
n
>100
‘当n大于100时退出循环
6、Do
……Loop
While
语句
，鬼老的思维真是最诡异，把While放在Loop后面却不是退出循环的条件，而是继续执行循环的条件。真令汉语思维费解。
例6、在立即窗口输出1到100
n=0
Do
'执行下行代码
n=n
1
Debug.Print
n
Loop
While
n
<=100
‘当n小于等于100时
，继续执行循环。