养生 装修 购物 美食 感冒 便秘 营销 加盟 小吃 火锅 管理 创业 搭配 减肥 培训 旅游

Excel VBA-----之do while loop的用法

时间:2024-10-29 00:28:47

前面已经说过do...loop的用法,本文将说明dowhile...loop、dountil...loop的用法

工具/原料

Excel软件

方法/步骤

1、dolo艺皱麾酪op相关的循环方法包括三种:a.do....loopb.dowhile...loopc.dountil...造婷用痃loop本文将通过两种循环方法,对Excel数据进行整理,即dowhile...loop、dountil...loop。

2、第一种方法dowhile...loop:while:类型if语句,当满则某个条件时才进行循环操作。dowhile.....loop

3、功能要求:利用dowhile...loop实现如下Excel表格中第三列的结果。输入如下表格数据:

Excel VBA-----之do while loop的用法

4、打患束锍瓜开VBE,输入代码;SubdoWhileLoop()Dimrs%rs=2DoWhileCells(rs,2)<>"&鳎溻趄酃quot;IfCells(rs,2)>=90ThenCells(rs,3)="是"ElseCells(rs,3)="否"EndIfrs=rs+1LoopEndSub

Excel VBA-----之do while loop的用法

5、回到Excel界面中,插入形状--指定宏,指定刚刚定义的doWhileLoop宏;

Excel VBA-----之do while loop的用法

6、运行该宏;则得到如下图的结果,即第三列中已经填充了结论。

Excel VBA-----之do while loop的用法

方法/步骤2

1、第一种方法dountil...loop:until:类型if语句,直到满足某个条件时,将退出循环。dountil.....loop

2、初始数据依然如下图所示

Excel VBA-----之do while loop的用法

3、打患束锍瓜开VBE,输入代码;SubdoUntilLoop()Dimrs%rs=2DoUntilCells(rs,2)=""朐袁噙岿IfCells(rs,2)>=90ThenCells(rs,3)="是"ElseCells(rs,3)="否"EndIfrs=rs+1LoopEndSub

Excel VBA-----之do while loop的用法

4、回到Excel界面中,插入形状--指定宏,指定刚刚定义的doUntilLoop宏;运行宏,得到如下运行结果。

Excel VBA-----之do while loop的用法

© 一点知识