Excel VBA 中使用的最重要的条件语句是语句 如果……那么 и 选择案例. 这两个表达式都测试一个或多个条件,并根据结果执行不同的操作。 接下来我们将更详细地讨论这两个条件运算符。
Visual Basic 中的“如果……那么”语句
操作者 如果……那么 检查条件,如果为真 (TRUE),则执行指定的操作集。 如果条件为 FALSE,它还可以定义一组要执行的操作。
运算符语法 如果……那么 喜欢这个:
If Условие1 Then
Действия в случае, если выполняется Условие1
ElseIf Условие2 Then
Действия в случае, если выполняется Условие2
Else
Действия в случае, если не выполнено ни одно из Условий
End If
在这个表达式中,元素 否则 и 其他 如果不需要条件运算符,可以省略它们。
下面是一个示例,其中使用运算符 如果……那么 活动单元格的填充颜色根据其中的值而变化:
如果 ActiveCell.Value < 5 Then ActiveCell.Interior.Color = 65280 'Ячейка окрашивается в зелёный цвет ElseIf ActiveCell.Value < 10 Then ActiveCell.Interior.Color = 49407 'Ячейка окрашивается окрашивается ет Else ActiveCell.Interior.Color = 255 'Ячейка окрашивается в красный цвет End If
请注意,一旦条件变为真,条件语句的执行就会中止。 因此,如果变量的值 活动单元 小于 5,则第一个条件为真,单元格为绿色。 之后,执行语句 如果……那么 被中断并且不检查其他条件。
了解有关在 VBA 中使用条件运算符的更多信息 如果……那么 可以在 Microsoft 开发人员网络上找到。
Visual Basic 中的“选择案例”语句
操作者 选择案例 类似于运算符 如果……那么 因为它还检查条件的真实性,并根据结果选择其中一个选项。
运算符语法 选择案例 喜欢这个:
Select Case Выражение
Case Значение1
Действия в случае, если результат Выражения соответствует Значению1
Case Значение2
Действия в случае, если результат Выражения соответствует Значению2
...
Case Else
Действия в случае, если результат Выражения не соответствует ни одному из перечисленных вариантов Значения
End Select
元素 CASE ELSE 不是必需的,但建议用于处理意外值。
在以下示例中,使用构造 选择案例 根据其中的值更改当前单元格的填充颜色:
选择案例 ActiveCell.Value Case Is <= 5 ActiveCell.Interior.Color = 65280 'Ячейка окрашивается в зелёный цвет Case 6, 7, 8, 9 ActiveCell.Interior.Color = 49407 'Ячейка окрашивается в зелёный цвет Case 10, 65535, 11, 20 ActiveCell.Interior.Color = 10498160 'Ячейка окрашивается цвет 案例 255 ActiveCell.Interior。 Color = XNUMX 'Ячейка окрашивается в жёлтый цвет Case XNUMX 到 XNUMX ActiveCell.Interior.Color = XNUMX 'Ячейка окрашивается в лиловый цвет CaseXNUMX 到 XNUMX ActiveCell.Interior.Color = XNUMX 'Ячейка окрашивается в лиловый цвет CaseXNUMX.ActiveColorXNUMX.ActiveColorXNUMX.ActiveColorXNUMX ейка окрашивается в красный цвет 结束选择
上面的示例显示了如何以各种方式为元素设置值。 案例 建设中 选择案例. 这些是方法:
案例是 <= 5 | 因此,使用关键字 案例是 您可以检查该值是否满足 表达式 表格条件 <= 5. |
案例 6,7,8,9 | 这样您就可以检查值是否匹配 表达式 与列出的值之一。 列出的值用逗号分隔。 |
案例 10 | 这将检查值是否匹配 表达式 具有给定值。 |
案例 11 而已 20 | 因此,您可以编写一个表达式来检查值是否满足 表达式 表格条件 从11到20 (相当于不等式“11<=value<=20”)。 |
CASE ELSE | 像这样,使用关键字 其他, 如果值为 表达式 与列出的任何选项都不匹配 案例. |
一旦找到其中一个条件,就会执行相应的操作并退出结构。 选择案例. 也就是说,在任何情况下,只会执行列出的分支之一。 案例.
有关 VBA 语句操作的更多信息 选择案例 可以在 Microsoft 开发人员网络上找到。