以不同的设置时间间隔运行多个宏vba通过按钮启动-按钮停止

以不同的设置时间间隔运行多个宏vba通过按钮启动-按钮停止,vba,Vba,我目前有5个宏,它们刷新我的数据,macro1刷新sheet1中的数据,macro2刷新sheet2中的数据,等等,直到sheet5,每个工作表都有自己的宏来刷新自己的工作表数据。所以我需要的是当marco1启动时,在运行MARCO2之前等待一分钟,“MARCO2完成”,在运行MARCO3 ans之前等待一分钟,直到最后一个宏,然后我可以启动序列,或者通过按钮随时停止序列。这是excel中来自web的数据,我曾尝试访问表属性,但无法按前面解释的时间间隔刷新所有5个表。 非常感谢您的帮助。请尝试以

我目前有5个宏,它们刷新我的数据,macro1刷新sheet1中的数据,macro2刷新sheet2中的数据,等等,直到sheet5,每个工作表都有自己的宏来刷新自己的工作表数据。所以我需要的是当marco1启动时,在运行MARCO2之前等待一分钟,“MARCO2完成”,在运行MARCO3 ans之前等待一分钟,直到最后一个宏,然后我可以启动序列,或者通过按钮随时停止序列。这是excel中来自web的数据,我曾尝试访问表属性,但无法按前面解释的时间间隔刷新所有5个表。
非常感谢您的帮助。

请尝试以下方法:

Sub testMacro1()
  'your code here
  Application.OnTime Now + TimeValue("00:01:00"), "testMacro2"
End Sub
Sub testMacro2()
  'your code here
  Application.OnTime Now + TimeValue("00:01:00"), "testMacro3"
  MsgBox "Macro2"
End Sub
Sub testMacro3()
  'your code here
  MsgBox "Macro3"
End Sub

它将在一分钟后运行“testMacro2”,然后在另一分钟后运行“testMacro3”。你可以把这个想法延伸到你的“宏5”子代码中

请尝试这种方法:

Sub testMacro1()
  'your code here
  Application.OnTime Now + TimeValue("00:01:00"), "testMacro2"
End Sub
Sub testMacro2()
  'your code here
  Application.OnTime Now + TimeValue("00:01:00"), "testMacro3"
  MsgBox "Macro2"
End Sub
Sub testMacro3()
  'your code here
  MsgBox "Macro3"
End Sub

它将在一分钟后运行“testMacro2”,然后在另一分钟后运行“testMacro3”。你可以把这个想法延伸到你的“宏5”子代码中

感谢您的快速响应,我尝试放置代码并根据需要进行修改,但我认为它可能不适用于按钮的单击事件,要以时间间隔运行所有五个宏,也许我应该将代码放置在另一个事件上?@hugo:您没有发布代码中的任何内容。。。我是否应该理解讨论中的五个宏不是宏,而是事件内部的代码?你能发布两个这样的“宏”的代码吗?如果是事件问题,您可以在模块中创建简单的
sub
,并从这些事件调用它们。。。也可以调用事件宏,但调用方式更复杂。那么,让长话短说,你能编辑你的问题并发布(相关部分)这两个宏的代码吗?这两个宏必须在一分钟后连续运行?雨果:如果我们谈论的是按钮的
点击事件,它应该可以工作,如果其他宏是模块内的子宏,或者甚至是包含
Click
事件的控件的表单模块内的子宏。所以,请从这个角度详细解释一下情况。好吧,多亏了你的解决方案,我才做错了。非常感谢,你刚刚救了我,让我知道谷歌搜索解决方案需要多少天。再次,非常感谢。我能够将所有宏放在同一个butoons单击事件中。感谢你的快速响应,我试着放置代码并根据需要修改它,但我认为它可能不适用于按钮的单击事件,以时间间隔运行所有五个宏,也许我应该将代码放置在另一个事件上?@hugo:您没有发布代码中的任何内容。。。我是否应该理解讨论中的五个宏不是宏,而是事件内部的代码?你能发布两个这样的“宏”的代码吗?如果是事件问题,您可以在模块中创建简单的
sub
,并从这些事件调用它们。。。也可以调用事件宏,但调用方式更复杂。那么,让长话短说,你能编辑你的问题并发布(相关部分)这两个宏的代码吗?这两个宏必须在一分钟后连续运行?雨果:如果我们谈论的是按钮的
点击事件,它应该可以工作,如果其他宏是模块内的子宏,或者甚至是包含
Click
事件的控件的表单模块内的子宏。所以,请从这个角度详细解释一下情况。好吧,多亏了你的解决方案,我才做错了。非常感谢,你刚刚救了我,让我知道谷歌搜索解决方案需要多少天,再次感谢你。我能够将所有宏放在同一个butoons点击事件中。