有另一个打开的工作簿的事件

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

然后运行Init。