VBA Do Until 循环

2025年3月17日 | 阅读 3 分钟

当我们需要重复执行一段代码或一组语句,直到条件为 True 时,可以使用 Do Until 循环。条件可以在循环的开始或结束时检查。

Do Until ... 循环语句在循环开始时检查条件,而 Do ... Loop Until 语句在循环结束时检查条件。

如果在循环开始时检查条件,如果一开始就满足条件,则代码块不会执行(循环甚至一次也不会运行)。如果条件在结束时检查,则循环至少运行一次。

语法

Do Until... 循环语句

流程图

VBA Do Until Loop

示例

在本例中,我们使用 Do Until... 循环在循环开始时检查条件。只有在条件为假时,循环内的语句才会被执行。当条件为 True 时,它将退出循环。

执行完代码后,您将获得输出

The value of i is: 6

The value of i is: 7

The value of i is: 8

The value of i is: 9

The value of i is: 10

The value of i is: 11

Do... Until 循环语句

Do...Until 循环用于在循环结束时检查条件。

语法

流程图

VBA Do Until Loop

示例

在本例中,我们使用 Do...Until 循环在循环结束时检查条件。即使条件为真,循环内的语句也至少执行一次。

执行完代码后,您将在消息框中获得以下输出。

VBA Do Until Loop

Exit Do 语句

您可以使用 Exit Do 语句提前退出 Do WhileDo Until 循环,而无需完成整个循环周期。

Exit Do 语句将立即停止循环的执行并立即执行代码段。在内部嵌套级别的情况下,它将停止并执行下一个外部嵌套级别。

您可以在单个循环中拥有多个 Exit Do 语句。在您希望在达到特定值或满足特定条件时终止循环,或者在您希望在某个时刻结束无限循环的情况下,它特别有用。

例如

执行以上代码,您将获得以下输出。

VBA Do Until Loop
下一主题VBA 函数