photosdematures.com

什么是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的序列号。

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