Excel2003を使用しています。

質問

Excel2003を使用しています。
ユーザフォームで入力フォームを作成ていますが、テキストボックスにIDを入力したら他のテキストボックスに対応する氏名をテーブルから読み取り表示することはできますか？なお、IDは２００以上ありリストボックスは不向きです。よろしくお願いします。

回答No.1

keithin · ベストアンサー

出来ますかと言うご質問なら，そりゃ勿論どんな方法を使っても出来ますよ。
ごくごくシンプルに，ワークシートに
Ａ列　Ｂ列
ＩＤ　名前
のように作成しておいて
if application.countif(worksheets("Sheet1").range("A:A"), textbox1) = 0 then
msgbox "no match data"
else
textbox2 = application.vlookup(textbox1, worksheets("Sheet1").range("A:B"), 2, false)
end if
みたいな作り方だって十分と思います。
あとは具体的なIDのデータの内容に応じて，Excelが計算しやすいように具体的なシートの作り方を工夫するだけです。

お礼

ありがとうございました。VBAの書籍を参考にしていますが、参考になる情報が少なく困っていました。とても助かりました。