📜  如何在 Excel VBA 中使用 While Wend 循环?

📅  最后修改于: 2021-09-23 05:00:29             🧑  作者: Mango

在本文中,我们将使用一个合适的示例来了解 Excel VBA 中的 While Wend 循环。

执行 :

在 Microsoft Excel 选项卡中,选择开发人员选项卡。最初,开发人员选项卡可能不可用。

开发人员选项卡可以通过两步过程轻松启用:

  • 右键单击 Excel 窗口顶部的任何现有选项卡。
  • 现在从弹出菜单中选择自定义功能区。

  • Excel 选项框中,选中开发人员框以启用它,然后单击确定。

  • 现在,开发人员选项卡可见。

现在单击Developer 选项卡中的 Visual Basic 选项并创建一个新模块以使用 Select Case 语句编写程序。

Developer  -> Visual Basic -> Tools -> Macros
  • 现在创建一个宏并给出任何合适的名称。

  • 这将打开编辑器窗口,可以在其中编写代码。

温德循环

在 while 循环中,所有语句都将在循环内执行,直到提供的条件变为 FALSE。循环仅在条件变为 FALSE 时终止。在 Excel 中,关键字While用于启动 while 循环,而Wend用于结束 while 循环。

语法是:

While boolean_condition(s)/expression(s)
    Statement 1
    Statement 2
    Statement 3
    ...
    Statement n
Wend

流程图

示例:打印组织中年龄介于 30 到 40 岁之间的所有员工的年龄。

代码 :

Sub While_Age_Emp()
'Initialize and declare the age of the employee
Dim Age As Integer: Age = 30
'Condition to print the age of employees between 30 to 40 years
While Age < 39
    Age = Age + 1
    MsgBox ("Age:" & Age)
Wend
End Sub

上述代码的条件是Age < 39 。当员工的年龄变为 40 岁时,条件变为FALSE ,循环终止。因此,它会在 Excel 的消息框中分别打印 31 到 39 岁的年龄。

输出 :