從VBS啟動Excel 2010工作簿時workbook_open無法正常工作

Question

我正在使用Excel2010。我正在使用以下代碼從VBS（VB腳本）打開test.xls文件：

Set objExcel = CreateObject("Excel.Application")
Set objWorkbook = objExcel.Workbooks.Open("E:\test\test.xls")
objExcel.Application.Visible = True

工作簿test.xls可以正常打開，但是我在Thisworkbook Module中放置的workbook_open宏：

Private Sub Workbook_Open()
MsgBox "Hello"
End Sub

不運行。

當我直接打開test.xls而不是通過VB腳本時，它可以工作。

我已將“開發人員”>“宏安全性”>“宏設置”設置為“啟用所有宏”，但這仍然無濟於事。

Answer 1

最近，我遇到了同樣的問題。 這是我所做的。

1. 將文件另存為.xlsm（已啟用marco的excel）。

2. 無需在工作表中編寫代碼，而是創建新模塊，然后將VBA代碼復制到名稱為“ Excel_Macro”的函數或子程序中。

3. 在VBS代碼中包含以下兩行（從此處打開excel）。

objExcel.Run（ “Excel_Macro”）

這對我有用。