Excel-VBA 快速上手（二、条件判断和循环）
文章目录
- 一、条件判断
- 1.1. IF 判断
- 1.2. Select Case 判断
- 1.3. IIF 判断
- 二、循环
- 2.1. For 循环
- 2.1.1. 按次数循环
- 2.1.2. 数组遍历
- 2.2. Do 循环
- 2.2.1 Do Loop Until
- 2.2.2 Do While Loop
- 2.3 提前中止循环
一、条件判断
1.1. IF 判断
语法
IF 判断的语法和其他编程语言大同小异
If 条件判断 Then'条件判断成立时的逻辑
ElseIf 条件判断 Then'条件判断成立时的逻辑
Else'条件都不满足时的逻辑
End If
示例
代码：
'函数内对参数进行条件判断
Function judge(num)If num Mod 2 = 0 ThenDebug.Print "参数是偶数"ElseIf num Mod 2 <> 0 ThenDebug.Print "参数是奇数"ElseDebug.Print "非法数字"End If
End Function'调用函数
Sub main()judge 2
End Sub
运行效果：
1.2. Select Case 判断
普通语法
Select Case '要判断的变量、也可使用表达式，相当于对表达式结果的值进行判断Case Is '大于、小于、等于、大于等于、小于等于、不等于判断'满足条件的逻辑Case Is '大于、小于、等于、大于等于、小于等于、不等于判断'满足条件的逻辑Case Else'条件都不满足时的逻辑
End Select
普通语法示例
代码：
'函数内对参数进行条件判断
Function judge(num)Select Case numCase Is > 0Debug.Print "参数是正数"Case Is < 0Debug.Print "参数是负数"Case ElseDebug.Print "参数是0"End Select
End Function'调用函数
Sub main()judge 0
End Sub
运行效果：
数值区间语法
Select Case '要判断的变量、也可使用表达式，相当于对表达式结果的值进行判断Case 区间起始数值 To 区间结束数值'满足条件的逻辑Case Else'条件都不满足时的逻辑
End Select
数值区间语法示例
代码：
'函数内对参数进行条件判断
Function judge(num)Select Case numCase 0 To 100Debug.Print "参数区间是0-100"Case 101 To 200Debug.Print "参数区间是100-200"Case ElseDebug.Print "参数是其他区间"End Select
End Function'调用函数
Sub main()judge 100
End Sub
运行效果：
1.3. IIF 判断
IIF判断与其他编程语言中的三目运算差不多，适用于按条件赋值的场景
语法
IIf(条件判断, 满足条件时的返回值, 不满足条件时的返回值)
示例
代码：
'函数内对参数进行条件判断
Function judge(num)Debug.Print IIf(num Mod 2 = 0, "参数是偶数", "参数是奇数")
End Function
运行效果：
二、循环
2.1. For 循环
For 循环可以按照次数进行循环，也可以对数组内容进行遍历
2.1.1. 按次数循环
语法
For 变量名 = 起始数值 To 终点数值 Step 步长循环体
Next 变量名
示例
代码：
Sub main()For num = 1 To 20 Step 2Debug.Print numNext num
End Sub
运行效果：
2.1.2. 数组遍历
语法
For Each 数组元素临时变量 In 数组循环体
Next 数组元素临时变量
示例
代码：
Sub main()Dim itemsitems = Array(1, 2, 3, 4, 5, 6)For Each Item In itemsDebug.Print ItemNext Item
End Sub
运行效果：
2.2. Do 循环
Do Loop Until 是满足条件后中止循环，Do While Loop 是满足条件后开始循环，Do Loop Until 不管条件是否满足，
都会先执行一次循环体内容，也就是说 Do Loop Until 最少会循环一次
2.2.1 Do Loop Until
语法
Do循环体
Loop Until 中止条件
示例
代码：
Sub main()Dim count As Integercount = 1Docount = count + 1Debug.Print countLoop Until count = 2
End Sub
运行效果：
2.2.2 Do While Loop
语法
Do While 循环条件循环体
Loop
示例
代码：
Sub main()Dim count As Integercount = 1Do While count < 10Debug.Print countcount = count + 1Loop
End Sub
运行效果：
2.3 提前中止循环
可以使用 End 关键字来提前中止循环，常用的场景是在集合中查找某个元素，当元素找到后就没必要继续循环下去
示例
代码：
Sub main()Dim count As Integercount = 1Do While count < 10Debug.Print countcount = count + 1If count = 3 ThenEndEnd IfLoop
End Sub
运行效果：
Excel-VBA 快速上手（二、条件判断和循环）相关推荐
- 小福利，excel里面采用sumifs多条件判断来快速整理数据，将一维表转为二维表,countifs多条件计数数据
小福利,excel里面采用sumifs多条件判断来快速整理数据,将单记录数据转换成横纵坐标表格数据 先看一下原数据,杂乱无章 第一步对姓名字段进行排序,看结果 第二步进行分类汇总 分别显示三个层次的分 ...
- 第五课-第三讲05_03_bash脚本编程之二 条件判断
第五课-第三讲05_03_bash脚本编程之二 条件判断 变量名称:只能保含字母数字下划线,且不能数字开头.不能和系统中已存在的环境变量重名.见名知意 bash中如何实现条件判断? 条件测试类型: 整 ...
- python条件输出_python基础（二）条件判断、循环、格式化输出
继续上一篇,今天主要总结一下条件判断.循环.格式化输出 一.条件判断 python中条件判断使用if else来判断,多分支的话使用if elif ... else,也就是如果怎么怎么样就怎么怎么样, ...
- python指定条件分类输出_python基础（二）条件判断、循环、格式化输出
继续上一篇,今天主要总结一下条件判断.循环.格式化输出 一.条件判断 python中条件判断使用if else来判断,多分支的话使用if elif ... else,也就是如果怎么怎么样就怎么怎么样, ...
- if函数多个条件php,EXCEL中IF函数多条件判断怎么写
在表格函数的运用中,"IF"函数我们经常用到,往往我们用"IF"判读多个条件时,运用的是多级嵌套的方式.然而,我们需要多个条件,只需满足其中一个条件时就返回真值 ...
- Excel.VBA 快速删除重复记录
Excel.VBA 快速删除重复记录 日常工作中的工作表中经常会有重复记录,清除这些重复记录是一个繁琐的工作,即使在排序之后再进行手工筛选,也经常会出现遗漏,而使用VBA代码就可以快速准确地删除重复记 ...
- 笔记整理1----Java语言基础（一）01 变量与数据类型+02 运算符与表达式+03 条件判断与循环语句+04 JAVA数组+05 函数与方法
01 变量与数据类型+02 运算符与表达式+03 条件判断与循环语句+04 JAVA数组+05 函数与方法 第01天 java基础知识 今日内容介绍 Java概述.helloworld案例 工 ...
- makefile（五）：makefile的条件判断与循环
如果说任何程序都可以由顺序,分支,循环来组成的话,前面介绍的相当于顺序部分,本部分介绍分支和循环 makefile的条件判断和循环非常简单. 一．条件判断 条件判断的语法如下: ifeq (条件表达式 ...
- python 动态执行条件判断_【人生苦短，我学 Python】基础篇——条件判断与循环语句（Day12）_不积跬步，无以至千里！-CSDN博客...
原文作者:AI 菌 原文标题:[人生苦短,我学 Python]基础篇--条件判断与循环语句(Day12) 发布时间:2021-02-08 23:17:06 写在前面:大家好!我是[AI 菌],一枚爱弹 ...
- smali to java_Smali —— 数学运算，条件判断，循环
通过上一篇 Smali 语法解析--Hello World 的学习,了解了 Smali 文件的基本格式.这一篇从最基本的数学运算,条件判断,循环等开始,更加详细的了解 Smali 语法. 数学运算 加 ...
最新文章
- 第二十一课.DeepGraphLibrary(二)
- RHEL5系统下故障处理方法
- 服务级后门自己做——创建服务
- Subversion的权限控制
- 打破两项世界纪录，腾讯优图开源视频动作检测算法DBG
- mysql修改客户端编码命令_mysql命令行修改字符编码
- 02：MongoDB操作
- lwip 2.0.3 DNS 域名解析 使用
- Android WebView中那些不得不解决的坑~~
- Winsock传输数据
- 文献格式 ShareLaTeX and Overleaf
- AutoJs学习-微信群发和引流
- gateface php,XAMPP下载-Xampp(PHP环境套件)V8.01 官方win版-ucbug软件站
- w10如何共享计算机硬盘,w10共享盘怎么设置_win10如何共享硬盘
- leecode:707. 设计链表
- 移动硬盘已连接USB但不显示盘符怎么办
- java打飞机游戏完整代码
- 百度网盘下载资源太慢，教你一招，速度直接提升到10MB/s
- 计组——彻底搞懂cache主存映射以及cache容量的计算
- Eclipse每次打包注意事项