控制代码程序的开始及停止

作者：绿色风分类：时间：2022-08-17 浏览：146

楼主 yjzstar	Q:如何随时控制代码的执行及停止？ A:控制代码运行于否的一种方法是对公共变量的控制，即把控制代码执行于否转化为对公共变量的控制。一般采用BOOLEAN类型的变量，也可以根据实际情况的需要改变变量的类型，已完成更加复杂的运算及控制！ Dim x As Boolean Dim i As Integer Sub 开始运行() x = True Call 变色 End Sub Sub 停止运行() x = False End Sub Sub 变色() If x = False Then Exit Sub With [A1] .Interior.ColorIndex = 1 + (i Mod 18) .Font.ColorIndex = 7 + (i Mod 18) End With i = i + 1 Application.OnTime Now + TimeValue("0:00:01"), "变色" End Sub 新建 Microsoft Office Excel 工作表.rar
2楼 xyf2210	进来学学
3楼 CheryBTL	这个很有意思，进来学习～～～
4楼魔高一丈nof	非常感谢啊！
5楼 lslly	非常有趣学习
6楼老糊涂	学习

免责声明

有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素，经与ExcelTip.Net站长Apolloh商议并征得其同意，现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示，供有需要的人士查询使用，也慰缅曾经的论坛时代。所示各个帖子的原作者如对版权有异议，可与本人沟通提出，或于本站点留言，我们会尽快处理。在此，感谢ExcelTip.Net站长Apolloh的支持，感谢本站点所有人**绿色风（QQ:79664738)**的支持与奉献，特此鸣谢！
------本人网名**KevinChengCW（QQ:1210618015)**原ExcelTip.Net总版主之一

评论列表