为另一个打开的工作簿创建事件

Question

我有一个发给客户的电子表格模板。由于它被发送给第三方，因此电子表格中不能有任何宏。我想要完成的是一旦电子表格发送回我，有能力将我写的宏绑定到双击返回的电子表格中的单元格(宏存储在我拥有的单独的电子表格中)。是否有可能让一个电子表格在另一个打开的电子表格上观看事件?

Answer 1

在标准代码模块中:

Public mySheetClass as new CustomSheet
Public Sub Init()
    Set mySheetClass.mySheet = NonMacroWorkbook.WorkSheets("TheSheet")
End Sub

在一个类模块中，名为CustomSheet:

Public WithEvents mySheet As Worksheet
Private Sub mySheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    MsgBox "Foo"
End Sub