Excel VBA----之do loop循环
来源:网络收集 点击: 时间:2024-02-24【导读】:
循环语句:do......Loop的使用方法及其基本案例说明。工具/原料moreExcel软件方法/步骤1/8分步阅读
3/8
4/8
6/8
7/8

8/8
1、do.....Loop:循环语句,直至满足条件后退出。
2/82、在VBE中编写代码:
Sub doLoop()
Dim a%
Do
a = a + 1
If a 10 Then
Debug.Print (a已经超过10了,该停止了!)
Exit Do
End If
Loop
End Sub
功能为:当a超过10时,将退出该程序。

3、运行该代码,运行11次时,将输出a已经超过10了,该停止了!

接下来,将对Do....Loop 进行复杂案例说明:
5/81、Excel界面的初始数据为:

2、在VBE中编写如下代码:
Sub judge()
Dim rs%
rs = 1
Do
rs = rs + 1
If rs 10 Then
Exit Do
Else
If Cells(rs, 2) 90 Then
Cells(rs, 3) = 是
End If
End If
Loop
End Sub

3、在Excel界面中指定宏,并运行代码,得到如下结果。
即:当分数超过90时,将在第三列中得到 是否为优秀的结果。



综上所述,本文说明了Do....Loop的使用说明,并结合Excel进行案例场景使用。
注意事项注意Excel属性的表达方式
EXCELVBA循环语句宏版权声明:
1、本文系转载,版权归原作者所有,旨在传递信息,不代表看本站的观点和立场。
2、本站仅提供信息发布平台,不承担相关法律责任。
3、若侵犯您的版权或隐私,请联系本站管理员删除。
4、文章链接:http://www.1haoku.cn/art_143467.html
上一篇:网易云音乐显示主人关闭权限
下一篇:秘鲁的的喀喀湖旅游攻略