システムトレード完全攻略（エクセル活用術）

OnKey メソッドを使います。通常はAuto_openという名前でプロシージャーを作りその中にOnKey　メソッドの構文を書くか、イベントプロージャーのWorksheet_Openのなかに書きます。そうすることにより、ショートカットを設定したい特定のＢＯＯＫを開いている間だけそのショートカットが有効になるわけです。


【使い方】・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・

Application.OnKey "key", "呼び出すプロシージャー"

引数 Key には、単独のキー Alt キー（%)、Ctrl キー(+)、Shift(^) キーのいずれか、または複数と組み合わせて指定します。たとえば、文字キー a を指定するには "a" と表記し、BackSpace キーを指定するには "{BackSpace}" と表記します。また組み合わせの表記の仕方は、文字キーとの組み合わせの場合は、　例えば、 Ctrl と　a の組み合わせの場合は　"+a"　となり、Shift と　ｄ の組み合わせだと、　"^d"、Ctrl と Shift と ｆ だと、"+^f" となります。特殊キーの場合｛｝を付け加え、"^{BACKSPACE}"のようになります。



【使用例】・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・

Sub Auto_Open()
Application.OnKey "^a", "本日の日付"
End Sub

Sub 本日の日付()
MsgBox Date
End Sub

Shift＋a で「本日の日付」を呼び出すプロシジャーです。コピペした後一度保存し、再度立ち上げて確認してみてください。

特殊キーを表すコードです。

BackSpace {BACKSPACE} または {BS}
Ctrl + Break {BREAK}
CapsLock {CAPSLOCK}
Clear {CLEAR}
Delete または Del {DELETE} または {DEL}
End {END}
Enter (テンキー) {ENTER}
Enter ~
Esc {ESCAPE} or {ESC}
Help {HELP}
Home {HOME}
Ins {INSERT}
NumLock {NUMLOCK}
PageDown {PGDN}
PageUp {PGUP}
Return {RETURN}
ScrollLock {SCROLLLOCK}
Tab {TAB}
F1 ～ F15 {F1} から {F15}
← {LEFT}
↑ {UP}
→ {RIGHT}
↓ {DOWN}

セルレーダー最新版ダウンロードした(^▽^)？







1位取れたら未公開プログラム沢山吐き出すので応援のポチ２つしてね（≧ω≦）

投稿者 システムトレーダー壱式 : 2008年05月05日 21:16