フォームを、開いてから開くテーブルを指定

質問

アクセスです。
開きたいテーブルが、6つあります。
フォームを、開いてから検索対象にするテーブルを指定したいのですが可能でしょうか?
指定方法は、チェックボタン等のオプションボタンか
コンボボックスで、指定して対象テーブルを開き前回と同じ条件で検索したいと思っています。
初心者では、無理でしょうか？
宜しくお願いします。

回答No.1

imogasi · ベストアンサー

アクセスでは色んな方法がありえる。だから難しいともいえる。
（１）操作のみ（２）マクロ込み（３）VBA込み（４）VBAだけ、など。下記は（３）
フォームにコンボボックスを１つ貼り付ける（私の場合「コンボ0」と名づけられた）
フォームのコンボのデザイン状態で、「プロパティ」を選び「データ」タブで
「値集合タイプ」を「値リスト」、「値集合ソース」で、（例えば）
"社員1";"社員2";"社員3"　とテーブル名を打ち込む。
--
「イベント」タブでコードビルダーを選び
Private Sub コンボ0_BeforeUpdate(Cancel As Integer)
MsgBox [コンボ0]
DoCmd.OpenTable ([コンボ0])
End Sub
を入れる。（MsgBox [コンボ0]の行は無くても良い。確認用）
（マクロビルダでも出来ると思う。内容は変わるが。）
表示ーフォームビューーjコンボのアイテムの社員2クリックで社員2テーブルが開く。
ーーー
ここまでは内容的に良いとしても、こういう単発的な内容（テーブルを開くだけ）のことは使えるか疑問を
持ったが。

お礼

課長へ確認したら全て同じシートにして検索したいとの事だったのでそのようにしました。
ありがとうございました。

補足

コンボボックスでは、上手くいかなかったのでチェックボックスにしました。
チェックボックスで、検索対象にするを開いて条件設定をし検索をすることは出来たのですが初めの検索をかけるときだけパラメーターの入力が立ち上がります。
項目なしのパラメーターの入力なので適当に入力し検索すると二回目からは何も立ち上がることなく検索を正しく行います。
何かがおかしいみたいです。