📜  如何在 Excel VBA 中使用 If-Else 语句?

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

Excel 中的 VBA 代表 Visual Basic for Applications,它是 Microsoft 的编程语言。为了优化性能并减少在 Excel 中的时间,我们需要宏,而 VBA 是后端使用的工具。

在本文中,我们将学习如何在 Excel VBA 中使用 If Else 语句。

执行 :

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

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

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

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

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

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

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

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

如果声明:

Excel 中 If-Else 语句的语法是:

If condition/expression Then
Code Block for True
Else
   Code Block for False
End If

流程图 :

示例:假设一家公司保留了一项新政策。由于COVID-19。该政策是奇数和偶数天在办公室的实际存在。年龄为偶数的员工周一和周三上班,年龄为奇数的员工周二和周四上班。

Sub Allocate_Employee()
'Declaring the variable age
Dim age As Integer
'Asking age from the employee
age = InputBox("Please enter your age:")
If (age Mod 2) = 0 Then
 MsgBox "You have to visit office on Monday and Wednesday"
Else
  MsgBox "You have to visit office Tuesday and Thursday"
End If
End Sub

输出 1:如果用户输入 24,这将是偶数,则 IF 中的值为 TRUE。因此,IF 中的代码块只会起作用。

输入年龄并点击确定

输出

输出 2:如果用户输入 27 这将是一个奇数将导致 IF 中的 FALSE 值。因此,Else 中的代码块只会起作用。

一些有用的链接,以获取有关 Excel 中宏、VBA 的更多见解:

  1. 在 Excel 中记录宏。
  2. 如何在Excel中创建宏?