• ベストアンサー

Excelで保護していないセルにカーソルを飛ばしたい

Excelでセルに入力しEnterを押したら保護していないセル に自動的にカーソルを飛ばしたいのですが、どうすればい いですか?

noname#4702
noname#4702

質問者が選んだベストアンサー

  • ベストアンサー
  • AQUALINE
  • ベストアンサー率33% (18/53)
回答No.1

そのシートのオブジェクトモジュール(VBEを立ち上げてMicrosoft Excelオブジェクトと書いてあるところ)を選択し、コードウィンドウに以下を貼り付けて見てください。 Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) ActiveSheet.EnableSelection = xlUnlockedCells End Sub シートを保護しておけばロックしてないセルしか選択できなくなります。

その他の回答 (4)

  • Hageoyadi
  • ベストアンサー率40% (3145/7860)
回答No.5

http://www.okweb.ne.jp/kotaeru.php3?q=618914 の記述も参考になるかと。 マクロ実行前に指定したセルのみにカーソルを移動させます。

  • imogasi
  • ベストアンサー率27% (4737/17068)
回答No.4

「保護されていないセル」と関係なく、 思う順序にカーソルを動かせないか考えて下記を作ってみました。参考になれば。Tab Orderのようなものです。 Private Sub Worksheet_Change(ByVal Target As Range) Select Case Target.Address Case "$A$1" Application.Goto Range("b8") Case "$A$2" Application.Goto Range("b9") Case "$A$3" Application.Goto Range("c9") Case "$C$9" Application.Goto Range("A4") End Select End Sub 上記を改善して、Target.Addressと飛び先を配列にすれば、場合が増えても、コードは長くならずに済みそうです。

回答No.3

Tabキーは保護してないセルにしか飛びません、これではだめですか。

  • wakky_tom
  • ベストアンサー率40% (20/50)
回答No.2

こんにちは メニューバーより[ツール]-[保護]-[シートの保護]で『このシートのすべてのユーザに許可する操作』の「ロックされていないセル範囲の選択」のチェックをつけて、「ロックされたセル範囲の選択」のチェックを外してみてください。

関連するQ&A

  • エクセル2003のカーソルの移動について

    エクセル2003で一部のセルを保護しました。入力できる(保護していない)セルのみ順にカーソルを移動たいのですが、どうすればよいでしょうか?

  • 特定のセルのカーソル移動

    こんばんは。教えてください。 入力可能なセルが2個だけのエクセルの表があります。 C6には「年」、E6「日付」が入ります。 それ以外のセルに触ると「ここは入力できません」と 表示が出て、C6にカーソルが戻ります。 VBにて作成してあります。 実は、この表は年配のパソコンがほとんど分からない方が 使う表で、保護をかけた時のエラーの長い文章が出ると パソコンが壊れたと思うらしく、わざと、保護はかけずに Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Application.Intersect(Target, Range("A1:IV5,A6,B6,E6,H6:IV6,A7:IV65536")) Is Nothing Then Else MsgBox "「年」と「月」以外の欄には入力できません" Range("C6").Select End Sub と入れて、簡単なメッセージでエラーを伝えるのみで シートの保護はしておりません。 これに追加して、記載することで、 C6のセルに入力後、「enter」を押すとE6にカーソルが移動 E6のセルに入力後、「enter」を押すとC6にカーソルが移動 が出来るようにしたいのです。 つまり、C6に入力したらE6に、E6に入力したらC6にカーソルが 「入力できるセル」だけを行き来したいのです。 どなたか教えてください。 宜しくお願いいたします。

  • エクセル カーソルを任意のセルに飛ばしたい!!

    エクセルで[Tab]や[Enter]を押してA3→B5→C8などのように任意のセルにカーソルを飛ばすことは可能でしょうか?? ACCESSではタブオーダー機能で出来ると思いますが、Excelにも似たような機能はあるのでしょうか? おわかりの方教えてくださーい!

  • Excelのセル内でのカーソルの動かし方

    教えてください。 Excelであるセル内に文字を入力中、矢印キーを押すとセルが移動してしまうと思いますが、 セルが移動せず、セル内でカーソルを移動させたい場合はどのようにしたらよいでしょうか? *あらかじめセルをダブルクリックする、数式バーに文字を入力する等ではなくて、 そういうキー操作になるような設定はないでしょうか?

  • エクセルのあるセルにカーソルを合わせると、エクセルが勝手に終了してしまいます。

    エクセルに入力している時に、あるセルにカーソルを持っていくと エクセルが終了してしまいます。 例えば、いくつかエクセルファイルを開いていた場合は、 現在入力しているファイルでないものも全て そのセルにカーソルを合わせた瞬間に消えてしまいます。 なにか数式が入っているのかな?とも思ったのですが 全く詳しくないので分かりません。 ちなみに、そのエクセルファイルはお客様から送られてきたもので ファイル内に弊社商品の情報を入力して送り返す という物です。 その入力すべきセルを触ると消えてしまうのです。 その減少がおきるセルは2マスあるのですが、どうしてなのでしょうか? 入力中に誤って触れてしまうと、一気にエクセルが消えてしまうので (もちろん保存もしてない常態で)困っています。 ご存知の方教えてください。

  • Excel 離れたセルにカーソルを移す方法

    私の使ってるシートでは入力すべき箇所がセルB3、G7など離れた位置にあります。セルB3で入力した後Enterを押すと次にG7へカーソルを移すことってできますでしょうか? いちいちマウスで次の箇所をクリックしたり、→キーで移動したりするのが面倒です。お願いします。

  • VBでのカーソル移動

    こんばんは。 教えてください。 入力可能なセルが2個だけのエクセルの表があります。 C6には「年」、E6「日付」が入ります。 それ以外のセルに触ると「ここは入力できません」と 表示が出て、C6にカーソルが戻ります。 VBにて作成してあります。 ここで、追加で、 C6のセルに入力後、「enter」を押すとE6にカーソルが移動 E6のセルに入力後、「enter」を押すとC6にカーソルが移動 が出来るようにしたいのですが、どのように記入したらいいか 分かりません。 どなたか教えてください。

  • エクセルでEnterを押したあと、カーソルを右横に

    エクセルでEnterを押したあと、カーソルが自動で右横に移動するためには、どうすればよろしいのでしょうか? 通常、1マスに数値などを入力して、Enterを押すと、真下の枠にカーソルが移動すると思います。 これを、Enterを押した後、右横のマスに移動するためには、どうすればいいのでしょうか? ご存じの方がいらっしゃいましたら、ご教授いただければ幸いです。 よろしくお願いします。

  • セルの自動移動

    エクセルで、入力後次のセルに移動するにはEnter等を押す必要があります。 シートに入力フォームを予め作っています。 1つのセルには1文字しか入力しないのですが、1文字を入力したら(Enter等を押さずに)自動的に次のセル(指定したセル)に移動することはできませんか? 例: セルB1に「1」を入力(1キーを押す)と次に入力したいB2へカーソルが移動

  • エクセル2007のカーソル移動の設定について

    エクセル2007の操作について教えてください。 エクセルのデータ入力時に、カーソルを右に移動できるように設定しました。たとえばセルA1からセルG1までにデータを入力したときにエンターキーを打つとセルH1にカーソルが移動します。このとき、セルHはデータ入力が不要なので、セルG1にデータが入力終了時点で次の行のセルA2に自動的にカーソルが移動しセルA2からセルG2までデータが入力できる設定はありますでしょうか。もしあるようでしたら教えてください。よろしくお願いいたします。

専門家に質問してみよう