【Excel VBA】Caseマクロを簡潔にしたい マクロの簡略化

特定範囲のセルはEnterした時に右などにカーソル移動するマクロを作りましたが、文字数は3万文字を超え、ビット数の肥大化により保存終了に時間がかかります。このマクロを簡潔にできないでしょうか？何卒ご教授願います。尚、マクロのテキストは長すぎるので以下リンクに掲載しています。
※Win8.1/７、Excel2010です。

http://4vote.sakura.ne.jp/macro.html

No.2 ベストアンサー 回答者： hallo-2007 回答日時： 2016/01/24 11:25

まずは、シートイベントを使ってください。

一例です。
指定したいシート名のタブを右クリックして
コードの表示をクリックして、VBエディターを起動します。
この時点でシートモジュールが選択されています。
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column < 6 Then
Target.Offset(0, 1).Activate
End If
End Sub
を張り付けて閉じてみてください。
意味は、6列目までで、セルの内容が変更されたら
右隣のセルをアクティブにするという意味です。

No.1 回答者： Hypnomatic 回答日時： 2016/01/22 20:49

１つ右のセルに移動するだけなら、IF式で動作範囲を指定して、offset関数を利用すればいいと思います。