我们还可以嵌套使用Select Case结构,如下面的示例代码所示: 示例代码4:嵌套的Select Case结构 Sub qtWithSelectCase() Select Case Range("A1").Value Case "工作表" Select Case Worksheets.Count Case 1 MsgBox "工作簿中有1个工作...
Select Case…Case…End Select语句 当一个表达式与几个不同的值相比较时，可以使用Select Case分支判断语句替换使用在If…Then…Else…End If语句中的ElseIf。If…Then…Else…End If语句会计算每个ElseIf语句的不同的表达式。在控制结构的顶部，而Select Case 语句只计算表达式一次。在下面的示例中，Select Case语...
1 1.点击鼠标右键选择新建一个Excel表格。2 2.根据自身的需要输入对应项目，然后制定判断规则。作者这里为90以上为优秀；80到90为良好；70到80为中等；60到70为一般。3 3.选择开发工具选项中的“宏”选项。4 4.输入判断规则的名称，然后点击“创建”按钮。5 5.写入判断成绩的代码。主要利用的代码为Select case。
1、AND，连接两个或两个以上条件，只有它们都满足、都为真时，整个条件表达式的结果才为真。2、OR，连接两个或两个以上条件，只要有一个满足，整个条件表达式的结果即为真。3、NOT，将真变为假，将假变为真。4、（），当有AND与多个OR条件组合的时候，把OR条件放到括号里，会改变整个条件表达式的结果。四、I...
流程图如下 重点解析，Select Case的判断流程类似于IF Elseif 但是他显然写起来很方便 当我们的判断条件...
Debug.Print "Not between 1 and 10" End Select 其中,在Select Case语句的使用过程中,应注意以下几点内容: ●如果testexpression与任何Case expressionlis 表达式匹配,则执行此Case子句和下一个Case子 句之间的语句,对于最后的子句,则会执行该子句到End Select之间的语句,然后控制权会转到 End Select之后的语句。如...
End Select End Sub 如果单元格A1中是数值1或3或5,运行代码后就会弹出“单元格A1中的值是5以内的奇数.”的消息框。 示例代码3:逗号分隔字符 Sub CharWithSelectCase() Select Case Range(“A1”).Value Case “A”, “E”,”I”, “O”, “U” ...
If语句:包括三种基本形式,单行形式、多行形式与嵌套形式。 Select Case语句:用于多条件选择的简洁语句。 If函数:与工作表中的If函数类似,用于条件判断。 Choose函数:用于根据索引选择返回值。常见问题及答案(FAQ)问题答案 Q1: If语句的三种形式分别是什么? If语句的三种形式包括:单行形式(If…Then…Else…)、多行...
1. Select Case with Numbers While writing a VBA code for the SELECT CASE statement, you can use operators to compare values. Now in the below code, you have >,<, and = operators to test the conditions. Sub SelectCaseExample1()
根据数据的特点，VBA将数据分为布尔型（boolean），字节型(byte)，整数型(integer)，单精度浮点型(...