質問: accessでコンボボックスの内容を変える方法を教えて下さい。 accessのフォームにてデータ入力画面を作成しています。 フィールド入力にコンボボックスを用いてリスト選択にしたいのですが、リストの量が膨大になってしまう為、その前のフィールド値によってリスト用テーブルを切り換えて使いたいと思っています。簡単に出来る方法があれば教えて下さい。
回答: えっと、問題を具体的にするために、以下のような設定だと仮定して話を進めます。 ご自身の環境と置き換えてお読みください。 ・数千種類の商品の中から、任意の一つを選択したい。 ・「t商品」テーブルには、次のフィールドがある。 商品id],[商品名],[商品分類 ・フォーム上に、コンボボックス「コンボa」と「コンボb」がある。 ・「コンボa」にて商品分類を選択し、コンボbに表示される商品を絞り込む。 ・「コンボb」で商品idを指定する。 ****** 1:コンボa と、コンボbをフォームに配置。 2:コンボa のプロパティ 名前:コンボa コントロールソース:空白(非連結) 値集合タイプ:テーブル/クエリ 値集合ソース:select 商品分類 from t商品 group by 商品分類; 3:コンボbのプロパティ 名前:コンボb コントロールソース:商品id 値集合タイプ:テーブル/クエリ 値集合ソース:空白 入力チェック:いいえ 4:コーディング private sub コンボb_enter() dim strrowsource as string if nz(me.コンボa, "") = "" then strrowsource = "select 商品id from t商品;" else strrowsource = "select 商品id from t商品" _ & " where 商品分類 ='" & me.コンボa & "';" end if me.コンボb.rowsource = strrowsource end sub なんかあったら、補足してください。