Excel:在 KeyUp 上运行另一个宏

Question

我正在尝试制作一个用户表单，并且有一个宏可以显示它。我希望这个宏（显示用户表单）在我按下（keyUp）时运行，只说Shift或Capslock键。

我在下面找到了相同的帖子，但是当我运行它时它显示错误。

https://stackoverflow.com/a/14209798/1279872

有关错误消息，请参阅随附的图像：

https://www.dropbox.com/s/8thupki17ajqde7/Picture1.png?dl=0

我正在使用的 vba 代码是（两个过程都在同一张纸上）

Private Sub Workbook_Open()
    Application.OnKey "{CAPSLOCK}", "testing"
    MsgBox ("test2")
End Sub
Sub testing()
    MsgBox ("test1")
End Sub

可以从以下链接下载 excel（如果您想查看相同的内容）：

https://www.dropbox.com/s/c277skeywsrkbzy/Book1.xlsm?dl=0

Answer 1

在ThisWorkbook中，您需要输入：

Private Sub Workbook_Open()
    Application.OnKey "{CAPSLOCK}", "testing"
    MsgBox ("test2")
End Sub

子testing应位于模块中。