• ベストアンサー

リストから項目を選択した後、隣のセルに自動的に移動させたい

よろしくお願いします。 今、エクセルで入力規制を使ってリストを作りました。 リストの項目は3つあって、あ・い・う とします。 A1のセルにリストを作りました。 やりたい事ですが、リストの中から あ を選んだ場合のみB1のセルに自動的にセルが移動して、さらにB1にもリストが作ってあって、項目が3つあって、1・2・3の中から選ぶというのを作りたいと思います。 リストを作るとこまでは出来たので後は、自動的に隣のセルに移動をさせたいだけなので、いい方法がありましたら教えて下さい。

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

  • ベストアンサー
  • xls88
  • ベストアンサー率56% (669/1189)
回答No.2

マクロになります。 該当シートの見出しを右クリック>コードの表示 でVBEが起動します。 コードウインドウに下記コードをコピペしてください。 Private Sub Worksheet_Change(ByVal Target As Range)   If Intersect(Target, Range("A1")) Is Nothing Then Exit Sub   If Target.Count <> 1 Then Exit Sub   If Target.Value = "あ" Then     Target.Offset(, 1).Select   End If End Sub

nango1
質問者

お礼

xls88さんのおかげで自分の思い通りの物が作ることが出来ましたm(__)m ありがとうございました。助かりました(^_^)

その他の回答 (3)

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

>隣のセルに自動的に移動させたい この表現が質問内容を表しておらず、適当でないのでは。 言いたいことは 例えばA列では 東京都 神奈川 埼玉 のどれかを選択する。 東京をA列で選択した場合は、B列の選択で 新宿店 池袋店 品川店 をリストに出したい。 埼玉を選択すると 大宮店 川口店 の様に出したいのではないのですか。 ソウでないなら・誤解ならすみません。 ーー 上記なら、Googleなどで「多段 入力規則」で照会すれば、相当数の回答が出てきます。 http://okwave.jp/qa670969.html http://hkom.blog1.fc2.com/blog-entry-531.html 「名前」機能とINDIRECT関数利用です。「名前 INDIRECT」でWEB照会のこと。 http://okwave.jp/qa3975835.html ほか多数。

nango1
質問者

お礼

imogasiさん、いろいろと参考になるご回答ありがとうございました(^_^) 今回はxls88さんので解決出来ました。

  • n-jun
  • ベストアンサー率33% (959/2873)
回答No.3

ANo.1です。 最後の行を読み飛ばしてましたのでスル~して下さい。

  • n-jun
  • ベストアンサー率33% (959/2873)
回答No.1

ドロップダウンリスト(入力規則)について http://www.kenzo30.com/ex_kisopoint/onepoint_sonota3.htm ご参考になれば。

nango1
質問者

お礼

ありがとうございました。今回はxls88さんので解決することが出来ました(^_^)また、わからないことがあったら教えてください。

関連するQ&A

  • 一つのリストを選択すると隣のセルに自動に入力される機能

    Excelで、次のことを行うにはどうしたら良いでしょうか。 シート セルA1 → a   セルB1 → 100 セルA2 → b   セルB2 → 200   セルA3 → c    セルB3 → 300 セルC1に「入力規則」の「リスト」機能を使用して、bを選択すると、自動的にセルD1に200が入力されるようにするには、どうしたら良いでしょうか。

  • セルの自動移動

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

  • 文字数が25文字を超えると自動的に隣のセルに移動させたい

    エクセルで子供用の日記を書けるフレームを作っています。一つのセルに入力する文字数が25文字を超えた場合、隣のセルに(詳しく言えば縦書きなので、左側のセルに)自動的にカーソルが移動していくような方法をご存知の方、ご教授願います。

  • エクセル入力規制リストでその他を選択した場合の内容

    エクセル入力規制リストでその他を選択した場合、 その他の内容をとなりのセルに入力できるようにしたいです。 例えばA1にリストがあって、リストの最後のその他を選択した場合のみ、 A1のセルにその他の内容を記載できるようにさせたいです。 どうしたら良いでしょうか? B1のセルに=if(A1="その他"...のようにするのかと考えていますがうまくいきません。 よろしくお願いいたします。

  • リストからの選択

    エクセルにて文字を入れる際にデータの入力規制を用いてリストから選択するようにしているのですが、そのリストを可変的にしたいのですが可能でしょうか? A1のセル: A,B,C から選択 A2のセル: A1が"A"の場合D,E,F       A1が"B"の場合D,G,H       A1が"C"の場合E,I,J の選択させたいです。

  • エクセルのセルの移動について

    言葉では表現しづらいのですが、精一杯お伝えしますので、汲み取ってください。^_^; ここでは仮にエクセルのワークシート上で『A1~C3』までの3行3列の表を作るとします。 通常、連続したデータを入力していく場合は、A1に入力後、タブキーで右にひとつ移動してB1のセルに任意の入力を行い、更にひとつ右のセルにタブキーで移動し、入力が済んだらC1で改行(エンター)で自動的にA2にセルは移動しますよね? これを縦横(行列)逆の考えで、A1に入力後、改行(エンター)キーでA2にセル移動、更に改行でA3に移動し入力が済んだら『自動(エンターキーの操作くらい)でB1セルに移動したい』のですが、どのような方法がありますか? 左手がデータの用紙をめくることでふさがっておりますので、できれば右手(テンキー)だけで出来る操作で何とかならないものかと思っています。 よろしくお願いします。

  • Excelでセルの色づけを自動に行いたいです。

    Excelでセルの色づけを自動に行いたいです。 入力した数値と同じ数のセルに、自動で色をつける事は可能でしょうか? 例えば、A1のセルに「5」と入力すると、隣のセルB1~F1までの5つのセルが 塗りつぶされるというようなことをしたいと思っています。 条件付書式、またはVBAで方法があれば教えて下さい。

  • Excelで別シートのセルを選択したら、その隣のセルを表示させたいので

    Excelで別シートのセルを選択したら、その隣のセルを表示させたいのですが、 やり方がわかりません。 このようなリストを作成しました。 ----------------  果物  値段 りんご  50 バナナ  100 パイン  120 ---------------- 別シートのA1(他のセル)に「りんご」と入力したら A2に「50」とを表示させる方法を教えてください。 ちなみに別シートのA1には「果物」で入力規則してあります。 プルダウンで「りんご」を選択したら、 自動的に連動させてA2に「50」といれたいのです。 IFなど検索しましたが、該当するのはみつけられませんでした。 よろしくお願いします。

  • エクセルで隣のセルに自動的に表示させるには

    エクセルでA1のセルに「001」と入力したら、B1に「商品名」C1に「単価」が自動的に表示されるようにしたいのですが、やり方が解りません、簡単にできる方法があれば教えてください、

  • エクセルのセルごとに選択リストをつけるには?

    エクセル(2000)について、質問をさせてください。 セルにカーソルをあてた時、そのセルに入力する項目を選択リストにして、 それを選ぶための▼ボタンが出せるかと思うのですが、 どのようにすればいいでしょうか? 過去に人が作ったのを見ていると、選択リストに表示したい項目が 別シートに並べて書いてあり、そこから取得しているようなのですが・・・。 よろしくお願いいたします。

専門家に質問してみよう