Vba 调度2个宏

（编辑：在随后的编辑中，海报声明问题已经解决，是由于拼写错误造成的，然后删除了整个问题文本。添加此注释后恢复的文本）

---

我需要安排2个宏：

Macro1“GetData”-需要每35分钟运行一次-从我的数据库检索数据。 Macro2“RefreshData”-需要在GetData完成后每1分钟运行一次-以更新我的数据

我试过：

Private Sub workbook_open()

Application.OnTime Now + TimeValue("00:35:10"), "GetData"
Application.OnTime Now + TimeValue("00:01:00"), "RefreshData"

End Sub

然而，我得到的是：

无法运行宏“c:\document and settings\alex\desktop\data.xlsm”！GetData“/该宏可能在此工作簿中不可用，或者所有宏都可能被禁用”

谢谢你的帮助

--更新-------

我现在创建了一个单独的GetData模块：

Private Sub workbook_open()

Application.OnTime Now + TimeValue("00:35:10"), "GetData"
'Application.OnTime Now + TimeValue("00:01:00"), "RefreshData"

End Sub

Public Sub GetData()
'' GetData ///////////////////////////////////////////////////////////////////////
....
....
End Sub

仍然收到相同的错误

--更新------

好的，在表1中，我有：

Public Sub workbook_open()

Application.OnTime Now + TimeValue("00:35:10"), "GetData"
'Application.OnTime Now + TimeValue("00:01:00"), "RefreshData"

End Sub

我现在已经插入>模块并将模块重命名为GetData

在该GetData模块中，我有：

Public Sub GetData()
'' GetData ///////////////////////////////////////////////////////////////////////
....
....
End Sub

---

任何欢迎评论

OnTime都要求引用的宏位于标准模块中。子模块也必须是公共的，这是模块的默认设置。插入模块，并将GetData和RefreshData移动到其中。

添加了新模块，仍然存在相同的问题Sue is i没有正确地为模块命名，school boy Error您需要留下一些p你的问题的艺术。你不能把整件事都删掉。人们不能回答“谢谢你的建议，伙计们，这是个拼写错误。”

Public Sub GetData()
'' GetData ///////////////////////////////////////////////////////////////////////
....
....
End Sub