office2021 フォームのオプションボタンでレポートのレコードソースを切り替え
office2021 1つのテーブルから、クエリを作成してデータを抽出することはよくあります。
そのクエリをもとにレポートを作成するとき、レポートのレコードソースでテーブルやクエリを指定します。
そのクエリをもとにレポートを作成するとき、レポートのレコードソースでテーブルやクエリを指定します。
レポートを開く時のイベントプロシージャ
レポートをデザインビューで開きます。
レポートのプロパティを開いて、[イベント]タブの[開く時]の[...]ボタンをクリックします。
![](https://blogimg.goo.ne.jp/user_image/35/cf/657653eeb690f3c556f6917f15a0c140.png)
[ビルダーの選択]ウィンドウが表示されますので、[コードビルダー]を選択して[OK]ボタンをクリックします。
![](https://blogimg.goo.ne.jp/user_image/76/2a/34e31cb11bc09171e37095282372aa28.png)
以下のVBEの画面が表示されます。
![](https://blogimg.goo.ne.jp/user_image/0d/24/596e114afd741deee831d8816cd216e9.png)
以下の内容を入力します。
Select Case Forms!F_選択!フレーム0
Case 1
RecordSource = "Q_東京社員"
Case 2
RecordSource = "Q_大阪社員"
Case 3
RecordSource = "Q_全社員"
End Select
以下のようになります。
参考どこのバージョンかは分かりませんが、[Me.]は入力しなくても動作するようになっています。
以下のようにしても構いませんし、動作しなかったら、[Me.]を追加してください。[Me.]は[自分自身の]という意味です。
[Me.]と入力すると、補助メニューが表示されるので、スペルなどのミスは少なくなると思います。
Me.RecordSource = "Q_東京社員"
![](https://blogimg.goo.ne.jp/user_image/46/d9/9ecfbbd0379034c7f208937de7871c7e.png)
これで完了です。
レポートを閉じて、フォームを開いて、動作を確認してみてください。
オプションボタンで[東京都]を選択すると、クエリ[Q_東京社員]の情報が表示されます。
オプションボタンで[大阪府]を選択すると、クエリ[Q_大阪社員]の情報が表示されます。
![](https://blogimg.goo.ne.jp/user_image/7c/3f/2fa49d38a837ac8ece955766ee43d894.png)
レポートのプロパティを開いて、[イベント]タブの[開く時]の[...]ボタンをクリックします。
![](https://blogimg.goo.ne.jp/user_image/35/cf/657653eeb690f3c556f6917f15a0c140.png)
[ビルダーの選択]ウィンドウが表示されますので、[コードビルダー]を選択して[OK]ボタンをクリックします。
![](https://blogimg.goo.ne.jp/user_image/76/2a/34e31cb11bc09171e37095282372aa28.png)
以下のVBEの画面が表示されます。
![](https://blogimg.goo.ne.jp/user_image/0d/24/596e114afd741deee831d8816cd216e9.png)
以下の内容を入力します。
Select Case Forms!F_選択!フレーム0
Case 1
RecordSource = "Q_東京社員"
Case 2
RecordSource = "Q_大阪社員"
Case 3
RecordSource = "Q_全社員"
End Select
以下のようになります。
参考どこのバージョンかは分かりませんが、[Me.]は入力しなくても動作するようになっています。
以下のようにしても構いませんし、動作しなかったら、[Me.]を追加してください。[Me.]は[自分自身の]という意味です。
[Me.]と入力すると、補助メニューが表示されるので、スペルなどのミスは少なくなると思います。
Me.RecordSource = "Q_東京社員"
![](https://blogimg.goo.ne.jp/user_image/46/d9/9ecfbbd0379034c7f208937de7871c7e.png)
これで完了です。
レポートを閉じて、フォームを開いて、動作を確認してみてください。
オプションボタンで[東京都]を選択すると、クエリ[Q_東京社員]の情報が表示されます。
オプションボタンで[大阪府]を選択すると、クエリ[Q_大阪社員]の情報が表示されます。
![](https://blogimg.goo.ne.jp/user_image/7c/3f/2fa49d38a837ac8ece955766ee43d894.png)
※コメント投稿者のブログIDはブログ作成者のみに通知されます