首页 > 代码库 > Excel VBA 快捷键 代码

Excel VBA 快捷键 代码

一.  在ThisWorkbook中

1 Private Sub Workbook_Open()2     %对应alt键 宏不能加()3     Application.OnKey "%q", "Test"4 End Sub

利用open事件触发

二.  在Sub中

Sub auto_open()    Application.OnKey "1", "test.模块1.Test "End Sub

设置快捷键为大键盘部分数字1, 宏中test为VBAProject修改的名称+模块名称+宏名

auto_open好像为固定命名的宏, 使用此名称的宏内容会自动执行一次

 

Excel VBA 快捷键 代码