こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

テキストボックスとコンボボックス

こんにちは、Accessのフォームにテキストボックスとコンボボックスを設置して、以下のような事ができないかと悩んでおります。

フォーム内には、テキストボックスとコンボボックスが設置してありまして、コンボボックス内にDB(会社名テーブル)から取得した全ての会社名が入っています。
しかし、そのレコード数が300件近くあるため、コンボボックス内から探し出すのに手間が掛かります。

そこで、コンボボックスの隣にテキストボックスを設置し、テキストボックス更新後に会社名テーブルの検索を行い、条件に合った会社名だけをコンボボックス内に入れることを考えているのですが、上手く行きません。

動作のイメージとしては下記のようになります。
(1)初期表示時はテキストボックス内に何も入力されていないので、全レコードがコンボボックス内に表示される。
(2)テキストボックスに「有限」と入力して、テキストボックスからフォーカスを移動させると、コンボボックス内に「有限」が会社名に含まれているレコードのみが入っている。
(3)テキストボックスを空白に戻すと、コンボボックス内には全レコードが表示

以上、どなたかご教授よろしくお願いします。

投稿日時 - 2007-01-25 23:47:23

QNo.2696539

すぐに回答ほしいです

質問者が選んだベストアンサー

コンボボックスの「値集合ソース」の会社名の抽出条件に
Like "*" & [Forms]![フォーム名]![テキストボックス名] & "*"
コンボボックスの「フォーカス取得時」イベントのイベントプロシージャに
Me.コンボボックス名.Requery
マクロなら
 アクション:再クエリ
 コントロール名:コンボボックス名

投稿日時 - 2007-01-26 00:44:34

お礼

早速のご教授ありがとうございました。
上記の方法で出来ました。

投稿日時 - 2007-01-26 21:45:33

ANo.1

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(1)

あなたにオススメの質問