我们还可以嵌套使用Select Case结构,如下面的示例代码所示: 示例代码4:嵌套的Select Case结构 Sub qtWithSelectCase() Select Case Range("A1").Value Case "工作表" Select Case Worksheets.Count Case 1 MsgBox "工作簿中有1个工作...
selectcaserange("A1")caseis>0range("b1")="正数"caseis=0range("b1")="0"caseelserange("b1")="负数"endselect'select还可以区间判断selectcaserange("A1")case0to1000range("b1")="正数"case1001to2000range("b1")="0"caseelserange("b1")="负数"endselect 表格中的iif 函数 sub IIF判断range(...
就是对变量/表达式进行判断,满足其中一个case的要求就执行对应case的代码段 2、演示实例需求 根据班级学生成绩判断优(大于等于90分)、良(大于等于80且小于90)、及格(大于等于60且小于80)、不及格(小于60)3、我们用Excel VBA的case判断实现的程序代码 Sub pb()Dim i As Integer Dim rg As Range For i...
我们还可以嵌套使用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 “工作...
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() Select Case Range("A1").Value ...
Excel VBA Range select case 方法/步骤 1 1.点击鼠标右键,选择“新建”选项中的“mircosoft office Excel 2007工作表”选项,新建一个Excel文件。2 2.打开Excel文件,根据需要录入对应的数据和学生成绩判断规则。3 3.选择Excel文件正上方的“开发工具”选项,然后点击“宏”按钮。4 4.录入代码程序的名称,然后...
Case后的表达式也可以是逗号分隔的数值或字符串,如下面的示例代码所示:示例代码2:逗号分隔数值 SubNumWithSelectCase()Select Case Range(“A1”).Value Case 1, 3, 5 MsgBox “单元格A1中的值是5以内的奇数.”End Select End Sub 如果单元格A1中是数值1或3或5,运行代码后就会弹出“单元格A1...
VBA 对象是指在 VBA 环境中可以处理的任何事物,如工作簿、工作表、单元格、图表等等。对象引用:可以使用点号"."来连接对象类、对象集合和对象名称或索引。例如,引用A1单元格:Application.Workbooks("Book1").Worksheets("Sheet1").Range("A1"),如果"Sheet1"是激活状态,可以Range("A1")二、属性与方法 对象...
Visual basic(VBA)电脑 方法/步骤 1 1.点击鼠标右键选择新建一个Excel表格。2 2.根据自身的需要输入对应项目,然后制定判断规则。作者这里为90以上为优秀;80到90为良好;70到80为中等;60到70为一般。3 3.选择开发工具选项中的“宏”选项。4 4.输入判断规则的名称,然后点击“创建”按钮。5 5.写入判断成绩...
Sub selectRange() MsgBox ActiveCell.Address End Sub 地址的格式如:$A$11。 6. 获取从当前活动单元格开始到边界单元格的区域 ' 从当前单元格到最顶端 Sub SelectUp() Range(ActiveCell, ActiveCell.End(xlUp)).Select End Sub '从当前单元格到最底端 ...