excel - auto_open / workbook_open 用于其他文件，不是这个

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]

好吧，这只是一种方式，还有很多其他方式取决于您的目标！