［Excel VBA］快捷键如何设置？

本文翻译至：http://itpro.nikkeibp.co.jp/atcl/column/15/090100207/090100146/

Application.OnKey 键, 函数名

执行Application对象的OnKey方法就可以设定宏（函数）的快捷键。键的指定通过｛　｝来围住键的名字。p键的话写成「｛p｝」，F2键的话写成「｛F2｝」。Shift或Ctrl，Alt进行组合的情况下，在前面各自加上「＋」「^」「％」。此外，指定大写「｛P｝」的话，要注意其实这是Shift＋p键的意思。指定与Excel标准快捷键相同的键的话，会比Excel的标准键优先执行。

要取消设定的快捷键的话，作为参数的函数名不需要输入，仅写入键值然后执行就可以了。

 

译者注，参考代码如下：

Sub Sample4()
    MsgBox "Ctrl + Alt + p Key is pressed."
End Sub


Sub Sample3()
    Application.OnKey "^%{p}", "Sheet3.Sample4"    
End Sub