プロパティに設定されます。ListBox1をクリックしたときのイベント0からsheetcntまで繰り返します。ListBox1のインデックス番号をChikuに代入します。インデックス番号とワークシート番号は1番違いですので、これを利用して、シート名を取得します。取得したシート名のシートをアクティブにします。UserForm1のTextBox1をSetFocusします。最後に、これまでのすべてのサンプルソースを記述します。"該当する住所はありません。"は、掲載がない地区のため住所を再確認してください。"住所1および住所2の入力誤りです。