auto_open/workbook_open for other file，not this one

Question

我知道，auto_open/workbook_open（後者=一個事件）在打開包含它的文件的一個模塊中時運行。

我想將一些東西放入file1.xlsm的模塊中，當在Excel中打開任何其他文件（.xls/.xlsx/.xlsm）時，該模塊將執行該操作。如果Excel和file1.xlsm已經打開。

是否存在類似「sub any_other_workbook_open」的內容？ （只是我試圖命名它）

謝謝！

Answer 1

如果其他工作簿是由過程中file1.xslm開了這是非常簡單的，如果不是，你總是可以準時檢查與此代碼打開任何其他工作簿的存在：

Dim w as Object 
Dim bOther as Boolean 

For Each w in Application.Workbooks 

    If w.Name<>ThisWorkbook.Name then bOther=True 

Next w 

If bOther=True then Call [Your Sub] 

嗯，這只是一種方式，還有許多其他方面取決於你的目標！