查询表在excel中自动更新

Question

我可以使用Excel中需要的特定表访问SQL数据库。 通过Excel，我创建了一个可以访问此表的表。 我想要的是让服务器在凌晨2点更新Excel中的SQL查询表，这样Excel文件每天早上总是有最新的数据。

我创建了一个VBSscript，我可以在给定时间通过任务计划程序运行。 VBScript看起来像这样：

Pair<Animal, Animal>

VBScript运行名为＆＃34; Sample＆＃34;我想创建一个更新此SQL查询表的宏，并尝试使用：

Dim xlApp
Dim xlBook

Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Open("C:\Users\XX.ZZ\Desktop\Book4.xlsm")
xlApp.Run "Sample"
xlBook.Save
xlBook.Close
xlApp.Quit

Set xlBook = Nothing
Set xlApp = Nothing

但到目前为止还没有奏效。有什么建议吗？

仅供参考，服务器始终处于打开状态，但代码运行时我没有登录。这有关系吗？

更新，我已尝试手动运行VBScript，几分钟后表将实际更新。所以我不认为宏是错的？但更多的事实是Windows没有给它足够的时间来执行任务？