プロが教えるわが家の防犯対策術!

Excelで、「Enter キーを押した後にセルを移動する(M)」 の 「方向」 を 「右」 にする設定があります。
これを、Bookを開いたときにそのBookに限って有効になるようにしたいのですが、Sheetのコードに入れておくなど方法がありますか。
教えてください、よろしくお願いします。

A 回答 (4件)

>Sheetのコードに入れておくなど方法がありますか。


特定のシートの特定の範囲だけ「右方向」に移動することも出来ますよ
以下、目的のシートモジュールに貼り付けてお試し下さい
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  'C10:H20セル範囲内なら右移動
  If Not Intersect(Target, Range("C10:H20")) Is Nothing Then
    Application.MoveAfterReturnDirection = xlToRight
  Else
    '設定範囲以外は下移動します。
    Application.MoveAfterReturnDirection = xlDown
  End If
End Sub
    • good
    • 0
この回答へのお礼

watabe007さん ありがとうございます。
指定セル範囲の右の列まで行ってしまうので、シートの保護でカバーしました。

お礼日時:2012/05/25 17:40

追記。


閉じるときに設定を元に戻すようにしておくのをお忘れなく。
    • good
    • 0
この回答へのお礼

frown_knightさん ありがとうございました。

お礼日時:2012/05/25 17:41

ThisWorkBookに以下の様に記述してみてください。



Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.MoveAfterReturnDirection = xlDown
End Sub

Private Sub Workbook_Open()
Application.MoveAfterReturnDirection = xlToRight
End Sub
    • good
    • 0
この回答へのお礼

kyboさん ありがとうございました。

お礼日時:2012/05/25 17:42

自動実行する方法


http://www.asahi-net.or.jp/~ef2o-inue/vba_k/sub0 …

マクロの中身は操作を記録させれば良いでしょう。
    • good
    • 0
この回答へのお礼

frown_knightさん ありがとうございました。

お礼日時:2012/05/25 17:43

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!