从循环中调用VBA中的倒数计时器

问题描述

我想为FOR LOOP的每次迭代从子例程中调用倒数计时器;计时器的持续时间基于它从循环循环通过的范围内的某个单元格中获取的值。

例如,单元格A1:A5的值分别为15,15,20,30。我想运行一个基本上以A1开头的宏,捕获15,然后启动倒数计时器15秒钟,当它达到0时,它将移至A2并重复该过程。

它没有按预期工作。

当我执行主例程以遍历上述范围并为该范围内的每个单元格调用Start_Timer例程(依次调用Next_Moment例程,直到计时器达到零并退出子例程)时,它似乎正在循环遍历完美地调整范围并增加持续时间。

但是,当调用Start_Timer例程时,它直到循环完全循环之后才执行计时器倒计时,并且在执行此操作时,计时器不会在第二个间隔内减少。

但是,如果我将对Start_Timer的调用放在循环之外,则计时器可以正常工作,但显然它只运行一次倒数计时器。

有什么想法吗?

调用Start_Timer之前和之后,我都尝试过使用DoEvents。

解决方法

没关系。我想出了如何使它完成我需要做的事情。现在,我需要通过单击其他按钮来了解如何中断/暂停计时器。

相关问答

Selenium Web驱动程序和Java。元素在(x,y)点处不可单击。其...
Python-如何使用点“。” 访问字典成员?
Java 字符串是不可变的。到底是什么意思?
Java中的“ final”关键字如何工作?(我仍然可以修改对象。...
“loop:”在Java代码中。这是什么,为什么要编译?
java.lang.ClassNotFoundException:sun.jdbc.odbc.JdbcOdbc...