Tag: doevents

允许excel行动，而application.Speech.Speak是活跃的

我有一个充当倒数计时器的代码（一张纸上最多三个计时器），并且在计时器处于活动状态时发生了几个动作。 现在一切正常。 当任何计时器达到0时，运行下面的代码片段： If Sheets("Sheet1").Range("C8").Interior.Color = 255 Or Sheets("Sheet1").Range("G8").Interior.Color = 255 Or Sheets("Sheet1").Range("K8").Interior.Color = 255 Then Beep Application.Speech.Speak ("Part is done") Beep Call AlertTIMER Else Exit Sub End If 从上面的代码段调用的AlertTIMER子运行Application.Wait 。 在上次调用和下一次调用之间创build一个3秒的暂停。 我已经包含了等待函数的原因是因为当Application.Speech正在运行时，我无法完成任何其他操作（例如单击终止Alert子项的“Stop”命令button）。 有没有办法允许命令button，而Application.Speech是活跃的，所以我可以删除Application.Wait函数？ 或者我需要保持我的Application.Wait的解决方法？ 我已经尝试使用DoEvents通过将其放置在第一声蜂鸣之前，但它没有工作。

为什么我不能使用DoEvents的CallInfront？

在VBA中，你可以在Call之前调用你的方法/函数，以便明确地告诉编译器，如果有的话你不想使用返回值。 现在DoEvents函数也应该可以通过调用来Call ，但是我不能做到这一点。 当我input： Call DoEvents 编译时只是说“语法错误”。 为什么我不能使用DoEvents ？ 在Excel 2016中使用VBE中的VBA，IIRC在2013,2010等也没有工作。

Excel中DoEvent的接口控件

我有一个macros来循环遍历一个范围，并返回基于.Display的电子邮件 DoEvents 元素在我的模块。 我反复说： row_number = 1 'And Do DoEvents row_number = row_number +1 'Then a bunch of formatting requirements Loop Until row_number = 'some value 我想知道是否会有一个简单的方法来在接口中引入一个计数器函数，在这个模块中，我告诉它我想要的起始行和最后一行的位置。 例如，如果我有一个单元格包含“开始在行”单元格与一个增加或减lessbutton来增加或降低它，然后一个“结束行”单元格与两个button，将增加或减less结束基于哪些行我需要启动或停止的值？ 那有意义吗？ 谢谢！