2010-11-09 96 views
2

我想設置一個腳本作爲Windows計劃任務每​​日運行。該腳本應打開一個Excel電子表格,等待它運行一個宏(設置爲每次打開電子表格時運行),然後在宏完成保存更改後關閉該文件。宏本身不會花很長時間才能運行。如果在再次關閉文件之前,我的腳本可以等待大約一分鐘,那應該就足夠了。如何用Windows腳本關閉打開的文件?

回答

2

完全未經測試的代碼,而且大多從內存中寫的,但希望足以讓您開始:

Set app = GetObject(, "Excel.application") ' assumes Excel is already running, otherwise use Set app = CreateObject("Excel.Application") 
app.Visible = True ' useful while testing 
app.run "MyMacro", "Param1" ' run the MyMacro macro with a string parameter "Param1" 
WScript.Sleep(60000) ' wait 60,000 ms = 1 minute 
app.ActiveDocument.Close 
app.Quit 
Set app = Nothing 
相關問題