条件语句

VBA中的条件语句是If...Then语句和Select Case语句。这两种方法都可以测试一个或多个条件，并根据结果执行对应的代码。

下面分别讨论这两种条件语句类型。

If...Then语句

If...Then语句测试一个条件，如果它的测试结果为True，则执行代码的特定部分。如果条件的计算结果为False，则执行另一段代码。

If...Then语句的语法如下所示：

在上面的If语句中，可以根据需要添加任意多个ElseIf条件。如果需要，还可以省略条件语句的ElseIf和Else部分。

在下面的例子中，If...Then语句用于根据单元格的值为当前活动单元格着色。

注意，在上面的例子中，If语句一旦满足了某个条件就会停止。因此，如果ActiveCell值小于5，则满足第一个条件，因此该单元格为绿色。If语句退出，而不再继续往下测试其它条件。

Select Case语句

Select Case语句类似于If ... Then语句，它测试一个表达式，并根据表达式的值执行不同的代码段。

Select Case语句的语法为：

在上面的代码中，语句的Case Else部分是可选的。

在以下示例中，Select Case语句用于根据单元格内容的值为当前活动单元格着色：

上面的例子说明了在Select Case语句中定义各种Cases的不同方法，它们是：

Case Is <= 5

这是使用关键字Case is来测试表达式是否满足条件（如<=5）的示例

Case 6, 7, 8, 9

这是说明如何通过用逗号来分隔可能的值来测试表达式是否为多个值中的任何一个的示例

Case 10

这是测试表达式是否为特定值的示例

Case Else

这是Else条件的一个示例，如果表达式与前面的任何情况都不匹配，则会执行该条件

请注意，只要Select Case语句中的一个case匹配，就执行相应的代码，整个Select Case语句就会退出。因此，代码不会进入多个Case代码块。