如何在Excel啟動時運行代碼（不是workbook_open）？

Question

我正在尋找一種在打開excel文件時運行代碼的方法，而不是從workbook_open方法中運行。

與特定名稱“ main_tables.xlsx”一樣，並且擅長打開，它們運行的​​自定義宏不是來自該文件。

有任何想法嗎？ 謝謝。

Answer 1

您可以使用加載項。

在ThisWorkbook模塊中使用以下代碼創建一個加載項：

Private WithEvents app As Application

' This will run when any workbook is opened.
Private Sub app_WorkbookOpen(ByVal Wb As Workbook)
    ' Check if this add-in is opening versus any other workbook.
    If Not Wb Is Me Then
        ' Another workbook is opening - do something...
        MsgBox Wb.Name
    End If
End Sub

' This will run when the add-in workbook is opened.
Private Sub Workbook_Open()
    ' Set the app variable so that we can listen for WorkbookOpen event
    Set app = Application
End Sub

通過選擇文件->另存為並選擇Excel加載項（* .xlam）文件類型，將其另存為加載項文件夾（通常為C：\\ Users \\\\ AppData \\ Roaming \\ Microsoft | AddIns）中的加載項。 。

然后在“文件”->“選項”->“加載項”中選擇“管理Excel加載項”，然后按“ Go ....”。這將顯示一個加載項列表，以自動啟動。 勾選您剛剛創建的加載項。

現在，當您打開任何工作簿時，外接程序代碼將運行。