Word2007でCtrl+hjklで移動できるようにする

[Windows][備忘録]Word2007でCtrl+hjklで移動できるようにする

あらすじ

  • あーWord使ってる時hjklで移動してーあとバックスペースも

手順

テンプレートファイルを編集するとできるよう。で、それはApplication Data下にある。

  • Word2007を起動し、左上のWindowsマークから開くを選択
    • ファイルの種類で「Word マクロ有効テンプレート(.dotm)」を選択
      • %APPDATA%\Microsoft\Templates\Normal.dotmを開く
  • 開発タブ -> VisualBasic -> Normal -> Microsoft Word Objects -> ThisDocumentに以下をペーストする
Sub BkSpPrc()
  Selection.TypeBackspace
End Sub
Sub MoveLeft()
    Selection.MoveLeft
End Sub
Sub MoveRight()
    Selection.MoveRight
End Sub
Sub MoveUp()
    Selection.MoveUp
End Sub
Sub MoveDown()
    Selection.MoveDown
End Sub
  • 左上のWindowsマーク -> Wordのオプション -> ユーザー設定 -> ショートカットキー:ユーザー設定 -> 分類:マクロ
    • マクロに上記で記載した関数が表示されていることを確認
    • マクロを選択してMoveLeftはCtrl+h、MoveDownはCtrl+j…とキーを割り当てていく

関連記事(この記事の初版より古い記事はリンクがグレーで表示されます)

  1. 2011/12/20 [Windows] CapsLockキーとCtrlキーを入れ替える(置き換える)方法
  2. 2011/12/19 [Windows] Excelの備忘録
  3. 2011/11/16 [Windows] Excel2007のF1キーを無効化する
  4. 2011/10/11 [Windows] Windowsのローカル環境にWordPressをインストールした
  5. 2011/09/30 [Java] [Windows] [Ruby] .msgファイルをパースして中から添付ファイルを抜き出す
  6. 2011/09/07 [Ruby] [Redmine] [SQLite3] [Windows] Redmineのプラグイン作成のための備忘録と、時々SQLite3
  7. 2011/08/23 [Ruby] [Windows] MicrosoftOutlookで消せなくなったフォルダをwin32ole経由でRubyから消してみる
  8. 2011/07/09 [Windows] [Ruby] MicrosoftOutlookのメールをRuby(win32ole)で操作する! その2
  9. 2011/05/17 [Ruby] [Windows] MicrosoftOutlookのメールをRubyで操作する!
  10. 2011/05/01 [Ruby] [Redmine] [Windows] Redmineインストール備忘録(Windows)
  11. 2012/10/01 [Ruby] [Bundle] [Windows] bundle execを省略したいのでバッチを作った(Windows版)
  12. 2012/07/17 [Ruby] [Windows] [Redmine] Windows版Redmineをサービスに登録してブート時に起動させる(宿題あり)
  13. 2012/04/24 [Git] [Windows] Pro Gitと入門Gitと入門gitと実用GitでGitの復習 無名ブランチ(detached HEAD)からの復活編
  14. 2012/04/23 [Git] [Windows] Pro Gitと入門Gitと入門gitと実用GitとGit道場#1でGitの復習 rebase編
  15. 2012/04/20 [Ruby] [Windows] ZenTestで実行したRSpecの結果をGrowlで通知してくれるようにした