Case Else 子句用于指示在任何Case选择中的testexpression和expressionlist 之间未找到匹配项时要执行的elsestatements语句。虽然不要求这样做，但最好是在Select Case块中包含Case Else语句来处理意外的testexpression值。如果没有expressionlist匹配Testexpression , 并且没有case Else语句, 则将继续执行End Select后面的语句...
VBA SELECT CASE is a statement to test multiple conditions. In this statement, you can specify one condition and then specify a code to execute if that condition is true and then specify a second condition and a code to run if that condition is true. In this way, you can specify multipl...
很是麻烦，那么Select Case就是为此而生，Seelct Case语句只需要写一个判断的对象，后续的Case分支里直...
我们还可以嵌套使用Select Case结构,如下面的示例代码所示: 示例代码4:嵌套的Select Case结构 Sub qtWithSelectCase() Select Case Range("A1").Value Case "工作表" Select Case Worksheets.Count Case 1 MsgBox "工作簿中有1个工作...
为了避免难以弄清的复杂的嵌套的If语句,你可以使用Select Case语句代替。它的语法为: Select Case 测试表达式 Case 表达式1 如果表达式1匹配测试表达式的语句 Case 表达式2 如果表达式2匹配测试表达式的语句 Case 表达式N 如果表达式N匹配测试表达式的语句 Case Else ...
Case 23, 24 msg = "午夜" End Select MsgBox "现在是:" & msg End Sub ___ 以上代码中,“Case 1 To11”表示当前时间在1点到11点,用于限定一个范围;“Case 12”是表示当前时间为12点时返回True,可用于限制一个具体的值,或者多个值。如果需要罗列多个具体的值,那么需要在每个值之间使用逗号分隔,例如...
Case 1: MsgBox "1" Case "A" MsgBox "A" Case Else MsgBox "未知值" End Select B. 表达式 TO 表达式 要求较小的表达式要出现在TO的前面 Dim Chenji As Integer Chenji = 50 Select Case Chenji Case 90 To 100 '成绩在90到100...
End Select End Sub 如果单元格A1中是数值1或3或5,运行代码后就会弹出“单元格A1中的值是5以内的奇数.”的消息框。 示例代码3:逗号分隔字符 Sub CharWithSelectCase() Select Case Range(“A1”).Value Case “A”, “E”,”I”, “O”, “U” ...
Select Case语句是针对多重判定任务反复进行循环操作的处理。虽然可以使用IF..Then..Else语句来实现,但是使用Select Case语句,不但代码清楚易懂,而且执行也比较快速。Case语句的条件时按照从上到下的顺序执行。…
1 1.点击鼠标右键选择新建一个Excel表格。2 2.根据自身的需要输入对应项目，然后制定判断规则。作者这里为90以上为优秀；80到90为良好；70到80为中等；60到70为一般。3 3.选择开发工具选项中的“宏”选项。4 4.输入判断规则的名称，然后点击“创建”按钮。5 5.写入判断成绩的代码。主要利用的代码为Select case...