• ベストアンサー

抽出条件でサブフォームを変えたい

ACCESS2000でVBAを使ってフォームを作成しています。 オプションボックス、リストボックスなどで担当者別、顧客別を選択した結果によって表示するサブフォームを変える事は可能でしょうか?

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

  • ベストアンサー
  • arara0123
  • ベストアンサー率47% (8/17)
回答No.2

ちょっとイメージしていたものと異なっていたようですね。 >まったく違うサブフォームの場合は、 >それぞれメインとリンクさせたクエリフォームを作成して、 >条件によってレコードソースを変えるというものでいいのでしょうか? これはメインフォームにあるオプションボックスで 「担当者別」をクリックすると 「担当者別」のサブフォームが表示され 「顧客別」 をクリックすると 「顧客別」のサブフォームが表示され レイアウトやレコードソースが異なっているような感じでしょうか。 それならば作成したサブフォームを両方ともメインに挿入し、 オプションボタンをクリックした時に、 サブフォームの表示を切り替える(visible = true or false) っていうのが簡単な気がします

t-tomo
質問者

お礼

ご返事が遅くなってすみません。 サブフォームの表示を切り替える方法としてvisibleを使用するのは思いつきませんでした. 担当者別オプションボタンをクリックした時のイベントで me!sub担当者別.SourceObject = "表示するフォーム" というやり方をなんとか思いついたのですが、arara0123さんの方法はすごく簡単なので今後活用していきたいと思います。 どうもありがとうございました。

その他の回答 (1)

  • arara0123
  • ベストアンサー率47% (8/17)
回答No.1

可能です。 ポイントとしては 1.担当者などで メインとサブのフォームをリンクさせる 2.オプションボックスやリストボックスのAfterUpdateイベントに 表示させたいデータになるような条件を書く といったところでしょうか

t-tomo
質問者

補足

早速の回答ありがとうございました。 まったく違うサブフォームの場合は、それぞれメインとリンクさせたクエリフォームを作成して、条件によってレコードソースを変えるというものでいいのでしょうか? 表示させたいデータになるような条件というのが今一つ理解出来なくて。 よろしくお願いします。