刷新使用Windows调度程序的Excel数据透视表

我负责更新每天从Access数据库中提取信息的Excel电子表格。 所有我需要的excel电子表格数据可供我使用,所有我需要做的事情是打开文档,提供密码,启用内容并单击刷新button。

数据库非常大,在正常工作时间更新这个数据库会导致问题,因为它会减慢networking上的其他用户。 我如何使用Windows调度程序在工作时间以外为我做这个? 我不知道如何设置我的脚本来按照我所需的步骤。

我通过VBA设法达到了这个目的

点击Alt – F11右键单击ThisWorkbook并单击查看代码。

代码如下:

Private Sub Workbook_Open()

Workbooks.Open(“您的工作簿的位置”),密码:=“无论您的密码是什么”ThisWorkbook.RefreshAll

结束小组

我保存这个文档,并要求任务调度程序在特定的时间运行它。

我最近不得不做一些与此类似的事情,在这个论坛的帮助下,我发现了一些适合我的东西,而且它的声音也可能适合你。

我用下面的.vbs脚本创build了一个记事本文件

Dim oExcel Set oExcel = CreateObject("Excel.Application") oExcel.Visible = True oExcel.DisplayAlerts = False oExcel.AskToUpdateLinks = False oExcel.AlertBeforeOverwriting = False Set oWorkbook = oExcel.Workbooks.Open("Full Path of your file.xlsx") oWorkbook.RefreshAll oWorkbook.Save oExcel.Quit Set oWorkbook = Nothing Set oExcel = Nothing 

它做了什么,它打开文件,刷新任何数据连接,然后保存文件并退出。

然后,我把这个作为一个计划任务运行在非高峰时间,以便当用户打开工作簿,它是最新的。

我希望这有帮助!