Microsoft excel 2003 のカーソルの移動について

質問

入力後のカーソル移動方向の選択に、

ツール　→　オプション　→　編集タブ　→　方向の選択

で行なっているのですが、これだとどのセルを開いても選択した方向にカーソルが動きます。

開いたセルごとにカーソルの動く方向を変えたいのですが、方法・設定のしかたはありませんか？

回答No.6

fmajin · ベストアンサー

補足を拝見しました。

「マウスでクリックするだけで…」ということでしたら、先の回答にあるようにVBA（マクロ）を習得される必要があるでしょう。
［Enter］キー押下後のセルポインタの移動方向を右や下に移動するマクロをそれぞれ作成し、ツールバーのボタンに割り当てれば、おっしゃるようなことが実現可能かと。
ただ、マクロは敷居が高く、まったくの初心者に対して、ここで説明することは不可能ですので、何か入門書などを一読されることをオススメいたします。その上で質問が生じた場合などは、再度投稿してくださいれば、親切な方から回答がいただけると思いますよ。

回答No.7

hana-hana3

＞justhomeみたいに、マウスでクッリクするだけで方向は変わらないのでしょうか。

ＶＢＡを使えば可能です。
プログラムを組む知識が無くても記録マクロを使えば操作を記憶できるので、行った操作を簡単なプログラムに変換してくれます。
あとは、ツールバーのオプションで新規のツールバーを作成して、そこにボタンを設定します。
そして、ボタンのアイコンを適当に設定して完了です。

いずれにしても慣れないと操作は結構面倒なので、参考書やネットを参考にしてみてください。

私はボタンが増えるのは嫌なので、移動方向の設定を右クリックメニューに登録して切り替えています。

回答No.5

fmajin

結果から言えば、［オプション］コマンドのこの設定は、エクセル全体の設定になりますので、ブックやシートごとに変更するということはできません。

VBA（マクロ）による方法の提示もありますが、この設定の変更を行いやすくしたり、バックグラウンドで自動的に行うというものですね。必然性が高ければ、これを機会に習得されるといいのではないでしょうか。

基本的には、No.2の方のようにキー操作を変更するのがオススメです。

入力範囲が限られるのなら、「名前」を活用する方法もあるでしょう。
たとえば、A1:E5のセル範囲を［Enter］キーで右へ右へ入力したいとすると、まずA2:E2をドラッグして選択したあと、［Ctrl］キーを押しながらA3:E3を選択し、以下同様に4行目、5行目と追加選択して、最後にA1:E1を選択します。［Ctrl］キーを押しながら選択することで、各行を別々に選択するのと、2行目から選択して最後に1行目を選択するのがポイントです。
この状態でシートの左上に「A1」などと表示されている「名前ボックス」に「入力範囲1」とでも好きな名称を入力して［Enter］キーを押してみましょう。こうすると、名前ボックス右の［▼］ボタンから設定した名前を選択するだけで範囲選択することができ、あらかじめ行ごとに選択した範囲を登録しているので、［Enter］キーでの移動方向が既定値の「下」になっている状態のままで、右へ右へと入力できるようになります。
ただし、あんまり行数が多いと１つの名前に登録できませんし、手間もかかるのでオススメできません。

利用状況に応じて、使いやすい方法を試してみてください。

お礼

回答ありがとうございます。

justhomeみたいに、マウスでクッリクするだけで方向は変わらないのでしょうか。

回答No.4

hana-hana3

＞て何ですか？

Excel の機能をコントロールしたり、作業を自動化するためのプログラムです。

移動方向を設定したいシートタブを右クリックして、「コードの表示」をクリックしてください。
開いた一番大きなウィンドウに下記のコード（Private Sub　～　End Sub　行まで）をコピーして貼付けてください。

途中の Move = 0　の数字を変更すると移動方向を変える事ができます。

Private Sub Worksheet_Activate()

Dim Move As Integer
'Enter Key 移動方向セット
' 0=右, 1=左, 2=上, 3=下
Move = 0
Select Case Move
Case 0: Application.MoveAfterReturnDirection = xlToRight
Case 1: Application.MoveAfterReturnDirection = xlToLeft
Case 2: Application.MoveAfterReturnDirection = xlDown
Case 3: Application.MoveAfterReturnDirection = xlUp
Case Else
End Select

End Sub

お礼

回答ありがとうございます。

justhomeみたいに、マウスでクッリクするだけで方向は変わらないのでしょうか。

回答No.3

O_cyan

簡単にやりたいのであればマクロを使えばできます。
メニューのツールにあるマクロからVisualBasicEditorを開きます。
左の方にVBAProjectのExcelObjectsがありその下にSheet1等が並び最後にThisWorkbookがありますのでそれをダブルクリックしVBの記述画面を表示させてそこの下記のMcr1とMcr2を順にコピーしてください。

Sub Mcr1()
Application.MoveAfterReturnDirection = xlDown
End Sub

Sub Mcr2()
Application.MoveAfterReturnDirection = xlToRight
End Sub
そしてVisualBasicEditorを閉じます。
メニューのマクロからマクロを選択するとThisWorkbook.Mcr1とThisWorkbook.Mcr2が表示されるのでMcr1の方を選び実行ボタンをクリックするとセルの移動方向が下になります。Mcr2を選んでクリックすると右方向への移動になります。
またはThisWorkbook.Mcr1を選んでオプションをクリックしショートカットキーを設定出来るのでCtrl+dとしてMcr2はCtrl+rとでも設定すればCtrlキーを押しながらDのキーを押せば下方向、Ctrlを押しながらRのキーを押せば右方向へ移動できるようになります。
試してみてください。

お礼

回答ありがとうございます。

justhomeみたいに、マウスでクッリクするだけで方向は変わらないのでしょうか。

回答No.2

mu2011

以下のキーを使用する方法はだめでしょうか。
右：Tab
左：Shift+Tab
上：Shift+Enter
下：Enter
又は、↑←↓→に矢印キー

お礼

回答ありがとうございます。

テンキーボードで入力しています。シートごとにカーソルの進む方向を、決めたいです。

回答No.1

hana-hana3

セル単位ですか？
シート単位ですか？
ブック単位ですか？

いずれにしても普通の設定では不可能です。
ＶＢＡなら出来るでしょう。

お礼

回答ありがとうございます。

シート単位で変えたいです。

＞ＶＢＡ

て何ですか？