Case Is >= 60判断rg大于等于60且小于80的时候，rg.Offset(0, 1) = "及格"给分数单元格的后移一列单元格赋值“及格”Case else判断rg小于60的时候，rg.Offset(0, 1) = "不及格"给分数单元格的后移一列单元格赋值“不及格”4、看看VBA代码执行后的效果 判断准确无误，你学会了么？~如果您喜欢的话，...
Sub 同样，您可以在工作表单元格A1中输入代表工龄的数字，运行代码后，会显示相应的年休天数，就像在上篇文章中所示的图一样。与上篇文章中的代码相比，既简单又易理解。Select Case结构的语法如下：Select Case条件（表达式）[Case表达式值1 [语句块] ][Case表达式值2 [语句块] ]……[Case Else [语句块] ]
Select Case…Case…End Select语句 当一个表达式与几个不同的值相比较时，可以使用Select Case分支判断语句替换使用在If…Then…Else…End If语句中的ElseIf。If…Then…Else…End If语句会计算每个ElseIf语句的不同的表达式。在控制结构的顶部，而Select Case 语句只计算表达式一次。在下面的示例中，Select Case语...
我们还可以嵌套使用Select Case结构,如下面的示例代码所示: 示例代码4:嵌套的Select Case结构 Sub qtWithSelectCase() Select Case Range(“A1”).Value Case “工作表” Select Case Worksheets.Count Case 1 MsgBox “工作簿中有1个工作表” Case 2 MsgBox “工作簿中有2个工作表” Case Else MsgBox “工作...
Select Case语句执行顺序图值1值2Else开始表达式执行语句块1执行语句块2执行语句块3结束通过本文的详细解析,读者可以全面掌握Excel VBA中的条件语句,包括If语句、Select Case语句、If函数与Choose函数的使用方法与应用场景。最新文章 C++中AVPacket的PTS/DTS时间戳运算与帧推送实现 使用OpenCV在C++中播放RTSP摄像头和系...
在VBA中，我们利用条件判断语句来执行不同的代码，最终形成我们所需要的结果。条件判断语句有两种：IF...THEN语句、SELECT CASE语句。一、IF...THEN结构 1、满足某一个条件时，执行相应代码：IF A>B THEN C=AEND IF 2、满足某一个条件时，执行代码A，否则执行代码B：IF A>B THEN C=AELSE C=...
Excel VBA---之判断语句select 简介 select case 语句 ：根据表达式的值来决定执行语句中的其中一个。工具/原料 Excel软件 方法/步骤 1 select case 语句 ：根据表达式的值来决定执行语句中的其中一个。2 1、在VBE中编写代码：Sub select单条件()i = 1Select Case iCase Is > 0 Debug.Print ("i>0")Ca...
Case "AB" Sheet1.[a3] = "AB型血的你,是个更不怎么样的人!" Case "O" Sheet1.[a3] = "O型血的你,还是不错的!" Case Else Sheet1.[a3] = "大哥,你是奇葩,居然没有你的血型!" End Select End Sub 我们说了VBA中间的条件判断语句,我们至此已经把条件判读语句说完了。在一章节我们将会说到循环...
流程图如下 重点解析，Select Case的判断流程类似于IF Elseif 但是他显然写起来很方便 当我们的判断条件...