VBA直到循环分步示例以在VBA中使用``直到''

什么是VBA Excel中的“直到循环”?

VBA直到循环,我们需要在直到语句之前定义条件,这意味着我们希望何时停止循环,而结束语句就是循环本身。因此,如果条件为FALSE,它将继续在循环内执行该语句,但是如果条件为TRUE,则将立即退出“直到”语句。

就像单词本身说要执行某些任务直到达到标准一样,在几乎所有编程语言中都使用“直到循环”为止,在VBA中,有时我们也使用“直到循环”。 “直到循环”表示在条件变为TRUE之前执行某些操作。就像逻辑函数基于TRUE或FALSE一样工作。

这与Do While循环相反,在Do While循环中,只要条件为TRUE,Do While就会运行循环。

句法

直到循环有两种语法。

语法#1

 直到[条件] [执行某些任务]循环 

语法#2

 执行[执行某些任务]循环直到[条件] 

两者看起来非常相似,并且存在一个简单的区别。

在第一种语法中,“直到”循环首先检查条件,并获得条件结果为TRUE或FALSE。如果条件为FALSE,它将执行代码并执行指定的任务;如果条件为TRUE,则它将退出循环。

在第二种语法“ Do”循环中,它将首先执行cod任务,然后测试条件是TRUE还是FALSE。如果条件为FALSE,它将再次返回并执行相同的任务。如果条件为TRUE,则将立即退出循环。

例子

我知道在理论部分理解任何东西都不是那么容易,但是没有什么可担心的。我们将为您提供一些简单的示例来理解循环。继续阅读。为了开始学习,让我们执行从单元格A1到A10插入前10个序列号的任务。

您可以在此处下载此VBA直到Excel模板– VBA直到Excel模板

请按照以下步骤应用“直到”循环。

步骤1: 首先创建一个宏名称以启动子过程。

代码:

 子Do_Until_Example1()结束子 

第2步: 将变量定义为 “长”。 我已将“ x”定义为长数据类型。

昏暗x长

第三步: 现在输入单词“ Do Before”。

直到

第4步: 启动循环名称后,输入条件为“ x = 11”。

 直到x = 11

x = 11是我们已应用的逻辑测试。因此,此行说要运行循环,直到x等于11。

步骤5: 应用CELLS属性,然后插入1到10之间的序列号。

单元格(x,1)。值= x

笔记: 在这里,我们提到“ x”从1开始,因此第一个x值等于1。

步骤6: 现在,通过输入单词“ LOOP”来关闭循环。

 Sub Do_Until_Example1()Dim x直到x = 11 Cells(x,1)时的值.x =循环 

结束子

好的,我们完成了编码部分,现在我们将逐行测试代码以更好地理解循环。

要逐行运行代码,请先按F8键。

它将首先以黄色突出显示宏名称。

当您看到黄线时,它表示如果再次按F8键,该行将不会执行。

现在再按一次F8键,黄线将转到“直到循环”。

现在了解循环,将光标放在变量“ x”上,然后查看变量“ x”的值。

因此,x = 0。由于突出显示的行是循环中的第一行,因此“ x”的值为零,因此再次按F8键并看到“ x”的值。在该出口之前,代码将运行并将值分配给“ x”作为1。

现在,再次按F8键开始运行循环。参见“ x”的值。

现在,“ x”的值显示为1。要使变量“ x”具有增量值,我们需要在循环内将变量“ x”的值重新分配为x = x + 1。

现在再按一次F8键,我们应该在单元格A1中获得1的值。

现在再次按F8键,看看“ x”的值是多少。

变量“ x”的值现在为2。因此,我们的条件要求运行循环直到条件变为TRUE为止,因此我们的循环将一直运行直到“ x”的值变为11。

再按一次F8,它将跳回到“直到”循环行。

再按两次F8键,我们将在单元格A2中获得2的值。

再次按F8键,“ x”的值现在变为3。

再按一次F8键,它将再次跳回到循环。

这样,该循环将再次继续执行任务,直到“ x”的值变为11。现在,我已经执行了循环,直到“ x”的值变为11。

现在,如果我按F8,它将仍然返回到循环。

但是如果我现在按F8键,它将退出循环,因为所应用的条件变为“ TRUE”,即x = 11。

因此,我们现在在Excel工作表中具有从1到10的序列号。

因此,这是“直到”循环的基本思想。要了解任何循环,您需要逐行运行代码,直到获得有关循环的全部知识为止。