ID非公開
ID非公開さん
2020/11/20 17:58
2回答
Access・VBA初心者です。
Access・VBA初心者です。 フォームにコンボボックスを設置し、初期値として「りんご」と入れておく。 サブフォームとしてリンクテーブルの果物テーブルを表示し、このテーブルの商品列が「りんご」の条件に一致するレコードが表示されている。 これを起動時の画面(初期画面)にしたいです。 また、コンボボックスを「みかん」に変えれば、商品列が「みかん」のレコードを表示したいです。 どうすればいいですか?
Microsoft Access | Visual Basic・28閲覧
ベストアンサー
コンボが「コンボ1」サブフォームが「フォーム果物」だった場合です。 コンボ1の「更新後処理」を[イベント プロシージャ]にしてください。 Private Sub コンボ1_AfterUpdate() フォーム果物.Form.Filter = "商品='" & コンボ1.Value & "'" フォーム果物.Form.FilterOn = True End Sub サブフォームの名前とソースオブジェクトが違う場合に指定するのは「名前」の方です。 「ソースオブジェクト」ではありません。
ID非公開
ID非公開さん
質問者
2020/11/21 8:27
なるべくFilter を使いたくないのですが、Filterを使わない方法ってありますか? 言葉足らずで申し訳ございません。
質問者からのお礼コメント
有難うございます。できました。
お礼日時:2020/11/25 11:42