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

質問

よろしくお願いします。
今、エクセルで入力規制を使ってリストを作りました。
リストの項目は３つあって、あ・い・う　とします。
Ａ1のセルにリストを作りました。
やりたい事ですが、リストの中から　あ　を選んだ場合のみＢ１のセルに自動的にセルが移動して、さらにＢ１にもリストが作ってあって、項目が３つあって、１・２・３の中から選ぶというのを作りたいと思います。

リストを作るとこまでは出来たので後は、自動的に隣のセルに移動をさせたいだけなので、いい方法がありましたら教えて下さい。

回答No.2

xls88 · ベストアンサー

マクロになります。
該当シートの見出しを右クリック＞コードの表示
で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

お礼

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

回答No.4

imogasi

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

お礼

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

回答No.3

n-jun

ANo.1です。

最後の行を読み飛ばしてましたのでスル～して下さい。

回答No.1

n-jun

ドロップダウンリスト（入力規則）について
http://www.kenzo30.com/ex_kisopoint/onepoint_sonota3.htm

ご参考になれば。

お礼

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