エクセルのコンボボックスについて質問です。

質問

エクセルのコンボボックスについて質問です。
まずワークシートのＡ列に「県名」、Ｂ列に「名前」を入力したとします。

Ａ列 Ｂ列
福岡 たかし
長崎 なおこ
長崎 きょうこ
佐賀 つとむ

として、ユーザーフォームにコンボボックスを２つ作ります。
まず、コンボボックス１に「県名」を表示させて、コンボボックス２には、
コンボボックス１で選んだ「県名」にあてはまる「名前」だけを
表示させたいんですが、どういう記述をすれば宜しいでしょうか？

（例）
コンボボックス１で「長崎」を選択したら、コンボボックス２に「なおこ・きょうこ」とリストができるようにしたい

回答No.1

Wendy02

こんにちは。

簡単に書けば、以下のようになります。
VLookUpなど機能的には同じだと考えてよいと思います。
元のデータには、タイトル行などが存在していないようですから、以下のように書きました。

Private Sub ComboBox1_Click()
'イベントは、都合のよいものを選んでください
　If ComboBox1.ListIndex > -1 Then
　　 MsgBox Worksheets("Sheet1").Cells(ComboBox1.ListIndex + 1, 2)
　End If
End Sub

Private Sub UserForm_Initialize()
'ComboBox のプロバティに入れてもよい
ComboBox1.RowSource = "Sheet1!A1:A4"
End Sub