Excelセルの平行移動

使い慣れたら手放せなくなってしまった。

Sub 平行移動1()
    On Error Resume Next
    Selection.Offset(1).Select
End Sub
Sub 平行移動2()
    On Error Resume Next
    Selection.Offset(-1).Select
End Sub
Sub 平行移動3()
    On Error Resume Next
    Selection.Offset(, -1).Select
End Sub
Sub 平行移動4()
    On Error Resume Next
    Selection.Offset(, 1).Select
End Sub

これらを前回紹介した方法でショートカット登録
自分の場合は
Ctrl＋Alt＋矢印

使うとこんな感じの移動ができる
 選択

  

Ctrl+Alt押しながら↓

 

  

Ctrl+Alt押しながら→

 使い慣れるとExcelデフォルト機能にしてほしいくらい良く使う・・・