VBA 中的条件语句

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 开发人员网络上找到。

发表评论