Microsoft Access Club Access超初心者対象Forum Access初・中級者対象Forum Access VBA Tips Forum DAO、ADO、SQL Forum

     

リストへもどる

投稿記事の一括表示

タイトルコンボボックスの応用について
記事No83179
投稿日: 2017/11/19(Sun) 13:09
投稿者
解決済: ON
OS:win10
Access Version:2016

年寄りの初心者です。
コンボボックスについて教えてください。
コンボボックスでリスト表示される量が多いので、隣のコンボボックス等で選択されたのを
確認して、該当するリストだけを表示したいのですが、やりかたが分かりません。
どなたか教えてください。

いろいろとネットで調べているのですが、「コンボボックスのフォーカス取得」とか専門的な
言葉につまづいています。

タイトルRe: コンボボックスの応用について
記事No83180
投稿日: 2017/11/20(Mon) 10:10
投稿者ナバ
解決済: ON
こんにちは。

> コンボボックスでリスト表示される量が多いので、隣のコンボボックス等で選択されたのを
> 確認して、該当するリストだけを表示したいのですが、やりかたが分かりません。

・コンボボックスにどんな情報を表示しているか
・隣のコンボボックスでどんな選択肢から選択するのか
・「該当するリスト」はどんな絞り込みをした結果なのか
をお書きになると、具体的なアドバイスができるかもしれません。

タイトルRe^2: コンボボックスの応用について
記事No83182
投稿日: 2017/11/20(Mon) 10:37
投稿者
解決済: ON
ありがとうございます。説明が下手で申し訳ありません。

「顧客」と「商品」の関係です。

顧客
A001
B001
C001
D001
E001

商品
商品1(A001用)
商品2(A001用)   
商品3(A001用)
商品4(B001用)
商品5(B001用)
商品6(B001用)
商品7(C001用)
商品8(C001用)
商品9(C001用)

上記のようなデータがあって、
「コンボボックス1」で「顧客A001」を選択する。
「コンボボックス2」では「顧客A001」専用の「商品」だけが選択できる。

というようにしたいです。
すみません、初めてなので説明がこれでいいのか心配ですがお願いいたします。

タイトルRe^3: コンボボックスの応用について
記事No83183
投稿日: 2017/11/20(Mon) 10:52
投稿者ナバ
解決済: ON
わかってきました。

「商品」コンボボックスの値集合ソースはどうなっていますか。
商品テーブルでしょうか。

タイトルRe^4: コンボボックスの応用について
記事No83184
投稿日: 2017/11/20(Mon) 10:58
投稿者
解決済: ON
素早い対応をありがとうございます。

商品テーブルにはゴチャゴチャと他の情報も入っているので、
クエリで抽出しようとしています。

タイトルRe^5: コンボボックスの応用について
記事No83185
投稿日: 2017/11/20(Mon) 11:30
投稿者ナバ
解決済: ON
> 商品テーブルにはゴチャゴチャと他の情報も入っているので、
> クエリで抽出しようとしています。

商品テーブルには「顧客コード」項目がありますか。
それとも商品名に「〇〇用」と書かれているだけですか。

タイトルRe^6: コンボボックスの応用について
記事No83186
投稿日: 2017/11/20(Mon) 11:34
投稿者
解決済: ON
はい、「顧客ID」を先頭にしまして、「オーダー登録専用」としています。

タイトルRe^7: コンボボックスの応用について
記事No83187
投稿日: 2017/11/20(Mon) 11:47
投稿者ナバ
解決済: ON
> はい、「顧客ID」を先頭にしまして、「オーダー登録専用」としています。

では、フォームの情報を使用してコンボボックスを絞り込みましょう。
フォーム名を仮に「商品フォーム」として説明します。

1.
コンボボックス「商品」の値集合ソースにするクエリ「商品コンボ用」を作成します。
クエリは商品テーブルを配置し、顧客IDの『抽出条件』欄にフォームの「顧客」コンボボックスを指定します。

Forms![商品フォーム]![顧客]

2.
コンボボックス「商品」の値集合ソースを「商品コンボ用」にします。

3.
「顧客」コンボボックスの更新後イベントで「商品」コンボボックスをリクエリーします。

Me![商品].Requery

タイトルRe^8: コンボボックスの応用について
記事No83188
投稿日: 2017/11/20(Mon) 11:55
投稿者
解決済: ON
ナバさん、懇切丁寧にありがとうございます。
今日一日かけてやってみます。できましたらご報告させていただきます。

タイトルRe^8: コンボボックスの応用について
記事No83189
投稿日: 2017/11/20(Mon) 14:53
投稿者
解決済: ON
ナバさん、教えてください。

やってみたのですが、抽出がうまくできません。
「顧客」に入力したデータで「商品コンボ用」クエリの「顧客」を抽出するということは分かっているのですが、そこで質問です。
3番の Me![商品].Requery は、コンボボックス「商品」のコントロールソースに記入でいいんですよね?
すみません、ど素人過ぎて。

タイトルRe^9: コンボボックスの応用について
記事No83190
投稿日: 2017/11/20(Mon) 15:15
投稿者ナバ
解決済: ON
> 3番の Me![商品].Requery は、コンボボックス「商品」のコントロールソースに記入でいいんですよね?
いいえ、違います。

3-1 コンボボックス「顧客」の「更新後処理」プロパティを選びます。
3-2 [イベントプロシージャ]を選択します
3-3 右端の「・・・」ボタンをクリックします。VBE画面が開きます。
3-4 
Private Sub 顧客_AfterUpdate()

End Sub

と表示されるので間にコマンドを書きます。

Private Sub 顧客_AfterUpdate()
Me![商品].Requery
End Sub

タイトルRe^10: コンボボックスの応用について
記事No83191
投稿日: 2017/11/20(Mon) 15:55
投稿者
解決済: ON
ナバさん、出来ました!

記入するところを間違えていたり、テーブルも間違えていました。
これで仕事が進めそうです。
本当に丁寧な説明をありがとうございました。
図々しいですが、またよろしくお願いいたします。

- 以下のフォームから自分の投稿記事を修正・削除することができます -
処理 記事No パスワード

ページの先頭へ 前ページへ戻る