本篇经验将和大家分享，在EXCEL工作表中，VBA循环语句do...loop之应用！
工具/原料
电脑壹台
OFFICE办公软件
方法/步骤
1、通过实例和大家分享我的经验，【实例：90分以上标注“√”】！
2、依次点击工作表中，菜单栏【开发工具】——【visualbasic】。
3、进入VB工作表，点击菜单栏中的【插入】，在下拉菜单中，选择【模块】。
4、在弹出的【模块】窗口，进行代码编辑！
5、编辑的代码如下：Sub分数等级标注()DimrsAsIntegerrs咯悝滩镞=2Dors=1+rsIfSheet4.Cells(rs,2)=媪青怍牙""ThenExitDoElseIfSheet4.Cells(rs,2)>=90ThenSheet4.Cells(rs,3)="√"EndIfLoopEndSub
6、同时按下CTRL+F11键，返回工作表，点击【开发工具】菜单下的【插入】按钮，选择一表单控件。
7、在工作表中的空白处，用鼠标一拉，便会出现一按钮，同时在弹出的【指定宏】窗口，选取刚才编辑的模块！
8、点击【标注】按钮，立即标注完毕！
