使用Windows Scheduler刷新Excel數據透視表

Question

我負責更新Excel電子表格，該電子表格每天都會從Access數據庫中獲取其信息。 我需要我的excel電子表格所需的所有數據，並且我需要做的就是打開文檔，提供密碼，啟用內容並單擊刷新按鈕。

數據庫很大，在正常工作時間內更新數據庫會導致問題，因為它會降低網絡上的其他用戶的速度。 在工作時間以外，我將如何使用Windows Scheduler為我執行此操作？ 我不確定如何設置腳本以遵循所需的步驟。

Answer 1

最近，我不得不做一些與此非常相似的事情，在這個論壇的幫助下，我發現了一些對我有用的東西，而且聽起來它也可能對您有用！

我使用以下.vbs腳本創建了一個記事本文件

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

這樣做會打開文件，刷新所有數據連接，然后保存文件並退出。

然后，我將其作為計划任務在非高峰時間運行，以便用戶打開工作簿時它是最新的。

我希望這有幫助！

Answer 2

我設法通過VBA實現了這一目標

按Alt-F11右鍵單擊ThisWorkbook，然后單擊查看代碼。

代碼如下：

私人子Workbook_Open（）

Workbooks.Open（“您的工作簿的位置”），密碼：=“無論您使用的密碼是什么” ThisWorkbook.RefreshAll

結束子

我保存此文檔，並要求任務計划程序在特定時間運行它。