Visual Studio Excel加载项-VB.Net-Application.OnKey错误

Question

在Visual Studio中，我使用用户窗体创建了一个加载项，用户可以在其中输入他们想要控制加载项按钮/子例程的热键。当有人单击用户窗体上的“确定”按钮时，我希望热键的输入成为所有Excel实例（而不仅仅是活动工作簿）的该子项的OnKey。不幸的是，这段代码并不能解决问题，而且我还担心已经安装在Excel中的其他加载项将优先于我尝试制作的热键。

1）您能否看一下我的代码并帮助我了解我做错了什么？

2）如何做到这一点，以使我的OnKey优先于其他也为宏分配了热键的插件？

Private Sub BtnOK_Click(sender As Object, e As EventArgs) Handles BtnOK.Click

    Dim ActiveWorksheet As Microsoft.Office.Interop.Excel.Worksheet =
        Globals.ThisAddIn.Application.ActiveWorkbook.Worksheets(1)

    '**"TBFontColorToggle" is the text box on the userform where user types in preferred hotkey**
    Dim FontColorToggleOnKey
    FontColorToggleOnKey = TBFontColorToggle

    '**Ctrl + Shift + User generated hotkey should run the subroutine in Visual Studio**
    Globals.ThisAddIn.Application.OnKey("+^FontColorToggleOnKey", "Sub_BtnFontToggle")

    Me.Hide()

End Sub