OUTLOOKでメール・タスク・カレンダを簡単に移動する方法
アウトルックには御存知の通り、メール・タスク・カレンダ・メモ帳・連絡先と大きく5つの機能があります。それぞれの機能の表示は CTRL+数字で切り替えることができます。これをもう少し簡単にやる方法をご紹介します。■AutoHotKeyといっても、アウトルックをカスタマイズするのはちょっと面倒なので、AutoHotKey にやってもらいます。アウトルックで、T/Y/U/I/O のキーにそれぞれの機能を割り当ててしまえばいいです。こうしておくと、メールを見ているときに、「あ、これ今日のスケジュールに登録してあったっけ?」と思いついたら、Yキーを押せば、すぐにスケジュール画面に切り替えることができるようになります。まあ、CTRL+2 を押せばいいだけなんですけど、一度単独キーでやれるようにしてしまうと、もう面倒くさくて CTRL や SHIFT を一緒に押す世界には戻りたくなくなります。で、以下がそのスクリプト◇――――――――――――――――――――――――――; アクティブウインドウがアウトルックのメイン画面ならt:: Send, {Blind}^4 ; タスク一覧y:: Send, {Blind}^2 ; 予定表一覧u:: Send, {Blind}^1 ; メール一覧i:: Send, {Blind}^3 ; アドレス一覧o:: Send, {Blind}^5 ; メモ一覧――――――――――――――――――――――――――◇これはアウトルックの本体がアクティブ(一番まえに来ている状態)のときだけ有効です。それ以外のときには、普通にキー操作ができないと困ってしまいますので。■単独のキー操作で、検索ができるようにするただし、このスクリプトをそのまま実装するとちょっと困ったことが起きます。検索ボックス(メール一覧の上にあるクイック検索)に入力しようとしたときに、上記のキーでこの機能が動いてしまいます。その回避として、検索も別ウインドウで処理するようにしたのがこちら。◇――――――――――――――――――――――――――; アクティブウインドウがアウトルックのメイン画面なら^e::e:: ; メール検索 Send, {Blind}^1 Send, {Esc} Inputbox, SearchText, "検索" Clipboard = %SearchText% Send, ^e Send, ^v sleep 200 Send, {Enter} return^w:: ; 連絡先検索 Send, {Blind}^1 Inputbox, SearchText, "連絡先" Clipboard = %SearchText% Send, {Blind}{F11} Send, ^v sleep 200 Send, {Enter} returnt:: Send, {Blind}^4 ; タスク一覧y:: Send, {Blind}^2 ; 予定表一覧u:: Send, {Blind}^1 ; メール一覧i:: Send, {Blind}^3 ; アドレス一覧o:: Send, {Blind}^5 ; メモ一覧――――――――――――――――――――――――――◇普通は、CTRL+E で検索ボックスにフォーカスを移動するのですが、これも面倒なので、e の単独キーで移動できるようにします。同じく、「連絡先の検索」(CTRL+W)もダイアログボックスに入力して検索するようにします。■メールフォルダの移動もキーボードで操作ついでながら、メールフォルダの移動(選択)もマウスではなく、キーボードでできるようにしています。たとえば、メールの分類フォルダが 受信箱 処理済み 処理待ち 実行待ち 完了・資料みたいに別れているときに、処理待ちのフォルダへ移動しようと思ったら、マウスでここをクリックしてやるのが単純ではあるのですが、いちいちマウスに持ち替えるのが面倒。そこで、u キーを押したらメールの画面になるついでに、フォルダにフォーカスが行くようにしています。定義はこんな感じ。◇――――――――――――――――――――――――――u:: Send, {Blind}^1 ; メール一覧 Send, {Blind}^e ; フォーカスを検索BOXに Send, {Tab 2} ; フォーカスをメールフォルダに return――――――――――――――――――――――――――◇これは、どこにフォーカスがあっても、CTRL+E で検索ボックスにフォーカスが移動するのを利用して、そこから TAB キーでフォーカスを移動させています。同じことを使えば、メールのリストビューやプレビューウインドウにフォーカスも1キーで移せます。最終的に今出来上がっているアウトルックを操作するための AutoHotKey スクリプトはこんな感じです。◇――――――――――――――――――――――――――; アクティブウインドウがアウトルックのメイン画面なら^e::e:: ; メール検索 Send, {Blind}^1 Send, {Esc} Inputbox, SearchText, "検索" Clipboard = %SearchText% Send, ^e Send, ^v sleep 200 Send, {Enter} return^w:: ; 連絡先検索 Send, {Blind}^1 Inputbox, SearchText, "連絡先" Clipboard = %SearchText% Send, {Blind}{F11} Send, ^v sleep 200 Send, {Enter} returnt:: Send, {Blind}^4 ; タスク一覧y:: Send, {Blind}^2 ; 予定表一覧u:: Send, {Blind}^1 ; メール一覧 Send, {Blind}^e ; フォーカスを検索BOXに Send, {Tab 2} ; フォーカスをメールフォルダに returni:: Send, {Blind}^3 ; アドレス一覧o:: Send, {Blind}^5 ; メモ一覧1:: Send, {Blind}+^1 ; 処理済みに移動s:: Send, {Blind}+^1 ; 処理済みに移動2:: Send, {Blind}+^2 ; NextAction Flag を付けて閲覧済みへq:: Send, {Blind}+^2 ; NextAction Flag を付けて閲覧済みへ3:: Send, {Blind}+^3 ; 依頼したタスク Flag を付けて閲覧済みへ4:: Send, {Blind}+^4 ; あとでちゃんと読む(閲覧済)5:: Send, {Blind}+^5 ; 着目スレッド:閲覧済へ移動a:: Send, {Blind}+^5 ; 着目スレッド:閲覧済へ移動6:: Send, {Blind}+^6 ; 完了フラグを付けて処理済みに移動7:: Send, {Blind}+^7 ; アウトルック側で未定義8:: Send, {Blind}+^8 ; アウトルック側で未定義9:: Send, {Blind}+^9 ; 引用して新しいタスク起票d:: Send, {Blind}^d ; 削除k:: Send, {Blind}{Up} ; 1行上j:: Send, {Blind}{Down} ; 1行下i:: Send, {Blind}{PgUp} ; 1ページ上m:: Send, {Blind}{PgDn} ; 1ページ下^e::e:: ; メール検索 Send, {Blind}^1 Send, {Esc} Inputbox, SearchText, "検索" Clipboard = %SearchText% Send, ^e Send, ^v sleep 200 Send, {Enter} returnw::^w:: ; 連絡先検索 Send, {Blind}^1 Inputbox, SearchText, "連絡先" Clipboard = %SearchText% Send, {Blind}{F11} Send, ^v sleep 200 Send, {Enter} returnn:: ; 閲覧画面へフォーカス Send, {Blind}^1 Send, {Blind}^e Send, {Tab 4} returnl:: ; メールリスト画面にフォーカス Send, {Blind}^1 Send, {Blind}^e Send, {Tab 3} returnb::^b:: ; フォルダ一覧にフォーカス Send, {Blind}^1 Send, {Blind}^e Send, {Tab 2} returnr::^r:: ; 全員返信(Outlook では CTRL+R が送信者のみに返信になっているので) Send, {Blind}+^r ; CTRL+SHIFT+R 全員返信+^r:: Send, {Blind}^r ; CTRL+R 送信者のみへ返信――――――――――――――――――――――――――◇