リストボックス内の検索

質問

リストボックス内で検索したいと思ってます。

Listbox1　　Listbox2
みかん　　　 ごぼう
りんご　　　 なすび
さかな　　　 さかい
おにく　　　 いちご
たまご　　　 みかん

上記のような感じで、UserFoamのなかにListboxが二つならんでいるのですが、Listbox1の「みかん」を選択すると、Listbox2の中から「みかん」を自動的に探し出して選択状態にするような事はできるのでしょうか？
　それと、Listbox1の「さかな」を選択すると、似たようなものの検索でListbox2の「さかい」を探し出して自動的に選択状態にする事はできるのでしょうか？
わかりずらい質問かもしれませんが、よろしくお願いします。

回答No.3

noname#187541 · ベストアンサー

こんばんは。
＞UserFoamのなかにListbox
ということからExcelだとして回答します。

ListBox1で「みかん」を選択してListBox2の「みかん」を選択状態にする方法です。
ListBox1で選んだものがListBox2に有れば選択状態に出来ます。

Private Sub ListBox1_Click()
On Error GoTo eLine
Me.ListBox2.Value = Me.ListBox1.Value
Exit Sub
eLine:
Me.ListBox2.ListIndex = -1
End Sub

もう一つの方は「似たようなもの」の基準が曖昧なので無理です。

補足

すいません。Excel2000です。
ありがとうございます。求めていた事ができました。
似たようなものですが、曖昧すぎました。
Textboxを一つ追加して、「さか」と入力すると、Listbox2の「さかい」を選択状態にする事は可能ですか？（前の文字が一致）できれば、大文字小文字関係なく選択したいのですが。

回答No.2

p-applepie

Officeのカテゴリに質問されていますが、Excelでしょうか？
Accessでしょうか？

補足

肝心な事を書いてませんでした。Excel2000です。大変失礼しました。

回答No.1

zap35

ListBox1にどのような値が入ったら、ListBox2に何を表示するのかがよく分かりません。「似たようなもの」だけでは何とも回答しようがありません。

TextBoxに「文字列」と入れたら「その文字と前方一致するリスト」をListBoxに表示する方法でよければ、過去に同様の回答をしたので参考にしてください。

http://oshiete1.goo.ne.jp/qa2437235.html