こんにちは。かなり前にご相談していた件につきまして、その後…としてお伺いします。
現在、各フォームのフォームヘッダーに検索ボックス(テキストやコンボ)を複数配置しておりましたが、手狭で、上記質問でご提案いただいていたポップアップウィンドウを採用したくなりました。
共通したものではなく、フォーム毎に別途作成したいと思っています。
少しヒントをいただいていたのですが、検索フォームを作成し、サブフォームとして埋め込んだ(見えないようにする。)後、ポップアップとして別ウィンドウでそれを確認できるようにすれば可能なのでしょうか。
●仕様
①各フォームから「検索」ボタンを押すとポップアップが開く。
②検索は複数条件を設定し、「抽出」(フィルターをかける)タイプ
③ポップアップの「検索実行」ボタンを押すと、ポップアップは閉じ、該当フォームに結果が表示される。
サブフォームにする必要はなく、それぞれ独立したフォームとして作成します。検索フォームはフォームのプロパティでポップアップとして表示されるよう設定しておきます
メイン-サブの関係であれば
のように、メイン(Me)からサブフォームのフィルタープロパティにアクセスできますが、フォームが独立している場合はしっかりフォームを指定する必要があります
Me(自分自身)ではないので、きちんと名前を使って相手を特定するという部分に注意すれば問題なく作成できると思います
ありがとうございます。サブフォームは必要ないとの理解で、
下記のコードにしてみたのですが、検索結果が帳票の1件だけとなります。
なぜでしょうか
'独立したポップアップフォームからメインフォームを参照する'
Forms!メインフォーム.form.filter = strFilter
メインフォームで表示件数を(Dlookup)表示させているのですが、件数はあっているようです。
実際は1件しか見えません・・??
本当にすみません。なぜか単票に切り替わっていました。帳票で表示されるようになりました!!!
また絞込み等で不明な点出て来たら質問させていただきます。
ありがとうございました!