相反，多的如在Excel VBA语句。然后，您可以使用选择事例结构。

现状：

Select Case in Excel VBA

将工作表上的一个命令按钮并添加以下代码行：

1.首先，声明两个变量。 Integer类型命名得分的一个变量和String类型命名的结果的一个变量。

Dim score As Integer, result As String

2.我们初始化变量得分与细胞A1的值。

score = Range("A1").Value

3.添加选择事例结构。

Select Case score

Case Is >= 80

result = "very good"

Case Is >= 70

result = "good"

Case Is >= 60

result = "sufficient"

Case Else

result = "insufficient"

End Select

说明：VBA Excel中使用变量得分，以测试每个后续Case语句的值，看看是否Case语句下的代码应该被执行。

4.写可变结果单元B1的值。

Range("B1").Value = result

5.测试程序。

结果当您单击工作表上的命令按钮：

Select Case Result

注意：Excel VBA大于或等于70且小于80的所有值的第二Case语句下执行的代码