エクセル改行を下・右に切り替えれる方法ありますか？

質問

office2010のエクセルで改行をExcelのオプションで下・右に切り替える方法はわかるのですが、ツールバーにアイコンを設置して改行を下・右に切り替える方法はありますでしょうか？

Excelのオプションで設定の切り替えをせずに上部ツールのアイコンみたいなので変更が簡単に出来ればと思っています。

宜しくお願い致します。

回答No.2

moon00 · ベストアンサー

VBAを使えば可能かと。

Sub kaigyo()
'
'改行で下の設定の場合は右に
'右の設定の場合は下に変更

If Application.MoveAfterReturnDirection = xlToRight Then
Application.MoveAfterReturnDirection = xlDown

ElseIf Application.MoveAfterReturnDirection = xlDown Then
Application.MoveAfterReturnDirection = xlToRight

End If

End Sub

こんなコードを作り、タブのアイコンに登録してやればいいと思います。
2007で動作確認しています。クリックするたび下→右→下→右と繰り返します。

タブへの追加の方法は
http://hamachan.info/win7/Excel/macro.html
VBAを含めた参考には
http://excel2010.kokodane.com/macro.htm
このあたりが役に立つと思います。

お礼

コードまで記載して頂きありがとうございます！
これで、簡単に切り替え出来るようになりました。

ありがとうございます。

回答No.1

kuma310min

＞ツールバーにアイコンを設置して改行を下・右に切り替える方法はありますでしょうか？

残念ながら、私の知る範囲では有りません。

一応基本とされているのは、
・Enterキーを押した際には「下」を設定
・左右へは、Tab・Shift+Tabキーで移動
で、横に数列あるデータをひたすら入力する際には、
・（Tabキーを使って）一行入力し終わってEnterキーを押すと、真下のセルではなく
　入力を開始した列まで戻る
という機能を使っている例が多いと思います。

お礼

VBAを使えば可能だったようです。
回答有難う御座いました。