VBA　OnKeyでマクロをショートカットキーに割り当てる

 

ショートカットキーの割り当て

 

Sub test1()


    '　「Ctrl + q」の割り当て
    Application.OnKey "^q", "myMSG"

    MsgBox "sub myMSG を　「Ctrl + q」に割り当てました"
End Sub

 

Sub myMSG()
    '　Ctrl　+q に割り当てる

    MsgBox "sub myMSG　は、「Ctrl + q」に割り当てています"

End Sub

 

 

 

 

ショートカットキー割り当の解除

 

Sub test2()


    '　ショートカットキー割り当ての解除　　(引数なしで解除）
    Application.OnKey "^q"

    MsgBox "「Ctrl + q」に割り当の解除をしました"


End Sub

 

ショートカットキー

「 ^q 」 = (Ctrl + q)

 

 

主要キー
・　Shift：「+」
・　Ctrl：「^」
・　Alt：「%」

 

 

― ― ― ― ― ― ― ― ― ― → Excel VBA基礎入門もくじ へ戻る 

 

参考記事