在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