50個分のクエリとフォームを作らないといけないのか!?
素人が見よう見まねで作っていますので、分かり難いかと思いますが、
何卒よろしくお願い致します。
現在、フォーム(検索)があり、そこに非連結コンボボックス(テキスト1)が
あります。このコンボボックスは、テーブル(取引先)の値(会社名)を参照して
います。会社名は約200あります。
テーブル(取引先)のフィールドは会社名、フリガナ、五十音別です。
今迄は、マウス操作で会社名を選んでいました。今度、タッチパネルLCDを
使う事になったのですが、コンボボックスでは、文字は大きく出来ても、
コンボボックスの枠やスクロールバーの幅を大きく出来ず、うまくタッチ
パネルでの操作ができません。
そこで、新たにフォーム(五十音)を作り、五十音分(あ~ん)のコマンドボタン
を作り、コマンドボタン”あ”を押すとクエリ”あ”で、テーブル(取引先)の
五十音別が”あ”の会社だけ抽出させ、結果をフォーム(あ)に表形式で表示
させました。
さらに、マクロ(値の代入)で、フォーム(検索)のコンボボックス改めテキスト
ボックス(テキスト1)に会社名を代入させました。
回りくどい事だと思いますが、これで、マウスで選ぶのと同じ事が出来ました。
しかし、この方法だと、クエリとクエリの結果を表示させるフォームが、それ
ぞれ50づつ必要になってしまいます。
50づつ作ってもいいのですが、きっと他にもっと簡単で明解な方法があると
思うのですが、素人ゆえ、全く見当がつきません。
簡単な方法がありましたら、ご教授のほど宜しくお願い致します。
なお、わがままを言って申し訳ありませんが、コンボボックスの枠を大きくした
りではなく、コマンドボタンを使う方法でお願い致します。
No.1ベストアンサー
- 回答日時:
まずはヒントだけ、
「フォームで入力した値をクエリの抽出条件」にできますから検索してみて下さい。
クエリの抽出条件は「あ」限定「い」限定となるような記載にしてますか。「あ」や「い」自身をパラメータ感覚で与えてやります。
「あ」のためのクエリ、フォーム
「い」のためのクエリ、フォーム
~
と作らなくてもよくなります。
フォームで条件を選ぶ、クエリで該当条件抽出、再クエリ、フォームにその条件で結果表示、フォームで違う条件を選ぶ、クエリで該当条件抽出、再クエリ、フォームにその結果表示、この繰り返しです。クエリもフォームも1つという構造にします。
クエリの抽出条件記載を工夫し数減らします。
早速のご回答ありがとうございました。
クエリの抽出条件をフォームのテキストボックスの値に
すれば、クエリも検索結果を表示するフォームも1つで
済むということは知っていたのですが、コマンドボタン
だけで、どうにかしようとばかり思っていたため、その
事を完全に失念していました。
ヒントを元に、フォーム内にテキストボックスを作り、
コマンドボタンのクリック時イベントで、"あ"~"ん"を
テキストボックスに代入させることにしました。
お陰様で、クエリもフォームも1つずつで済みました。
この度はありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) AccessVBAで降順にするテーブル作成クエリを使用して作成したテーブルを削除し同一のテーブル作成 1 2023/01/06 11:17
- Access(アクセス) Accessにインポートした複数のテーブルを表示させる方法が分かりません。 1 2023/01/30 20:22
- Access(アクセス) Accessの参照フィールドの列がずれてしまいます 1 2023/07/19 15:00
- その他(データベース) 更新クエリをリンクデータベーステーブルに実行し実行時エラー3362固有インデックスに重複する値が含ま 1 2022/09/21 11:44
- Access(アクセス) Accessテーブルの結合で別々のテーブルのフィールドを組み合わせて値を出す方法について 2 2022/07/20 19:43
- SQL Server DBのテーブルの設計ができず困っています。 2 2023/06/29 16:43
- JavaScript ラジオボタンによるフォームの開閉を行いたい 3 2022/03/31 21:30
- Access(アクセス) アクセス フォームの自動入力 1 2023/03/20 00:18
- Access(アクセス) Access 登録ボタンからサブフォームの更新 1 2022/07/22 10:23
- Access(アクセス) アクセスの更新クエリでカレントレコードのみ更新したい 1 2022/06/02 23:32
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAからクエリのパラメータを設...
-
検索フォームで空白を抽出したい
-
Accessのフォームで、空欄のレ...
-
年月日を持つテーブルから年月...
-
アクセス 抽出後も全体の最大...
-
Access レポート印刷するときに...
-
YahooのIDがロックされてしまい...
-
エクセルVBA オプションボタ...
-
passwordが入れられません・・・・
-
皆さん使っているブラウザを教...
-
「フォームを作成できませんで...
-
Word縦書きで左から右への行
-
サブフォームに対してGoToRecor...
-
コマンドプロンプト使用時に「'...
-
Access データのないフォーム...
-
Excelで入力したデータを自動的...
-
日付のテキストボックスに(例...
-
親・子リンクフィールドの設定...
-
レコードを保存するコード ア...
-
エクセル 自動入力
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
年月日を持つテーブルから年月...
-
SQL*Loader
-
アクセスのフォームにカンマ区...
-
Accessのフォームで、空欄のレ...
-
Access2000で文字列中の半角ス...
-
VBAからクエリのパラメータを設...
-
Accessの検索フォームで。
-
access 検索フォームで検索が...
-
パススルークエリの動的パラメ...
-
検索フォームで空白を抽出したい
-
ACCESS マクロで検索に...
-
ACCESS2003 でクエリの抽出条件...
-
AccessにてExcelファイル名にパ...
-
ACCESSのフォーム上で複数検索...
-
Access2007のサブフォームのReq...
-
複数条件検索について
-
Access テキストボックスとlik...
-
where条件式であいまい検索がし...
-
Accessでの電話番号下4桁での検...
-
VBAユーザーフォーム内のテキス...
おすすめ情報