アクセスフォームについて教えて下さい。

質問

アクセスフォームについて教えて下さい。

テーブル
T_設備
設備管理No.
状態ID（フィールドプロパティ→コンボボックス）
分類ID（フィールドプロパティ→コンボボックス）
設備名
（その他項目あり）

T_状態
ID　
001　　稼動中
002　　停止中

T_分類
ID
001　　専用機
002　　マシニング

T_設備、T_状態、T_分類はリレーションシップを組んでいます。

クエリ
T_設備を元にクエリを作成　Q_設備　（全データを表示）
稼動中の設備を抽出　Q_稼働設備
停止中の設備を抽出　Q_停止設備

フォーム
Q_稼働設備を元にフォームを作成　F_稼働設備一覧（表形式）
Q_稼働設備を元にフォームを作成　F_稼働詳細（単票形式）

表形式のフォーム（F_稼働設備一覧）にコマンドボタン（コマンド1）を作成、
OPENFORMメソッドでクリックした行のデータを表示させるようにしました。
（単票形式のF_稼働詳細でデータの詳細を確認したい）

Private Sub コマンド1_Click()
DoCmd.OpenForm "F_設備詳細"
Forms!F_設備詳細!設備管理No. = Forms!F_稼働設備一覧!設備管理No.
End Sub

しかし、コンボボックスの内容を変更（稼動中から停止中へ）し、フォームを閉じ、
再度F_稼働設備一覧を開くと、データがQ_停止設備へ移動しておらず、
コンボボックスも稼動中に戻ってしまっています。

コマンド1ボタンからではなく、直接F_設備詳細を開き、コンボボックスの停止中を
選択した場合は、データはQ_停止設備へ移動します。

OpenFormメソッドの記入に問題があるのでしょうか？

色々と試しましたが、解決できませんでした。

よろしくお願いいたします。

回答No.1

noname#182251 · ベストアンサー

ＶＢＡはよく知らないし、ざっと見ただけですが

Forms!F_設備詳細!設備管理No. = Forms!F_稼働設備一覧!設備管理No

これは Forms!F_稼働設備一覧!設備管理No　の番号で該当する詳細を開きたいつもりのようですが、実行されているのは開かれた詳細の設備管理Noを Forms!F_稼働設備一覧!設備管理Noにより書き換えているようです。

該当する詳細を開く方法は色々あるでしょうが、フィルターの使用など如何でしょうか？

お礼

ご回答ありがとうございます。
勉強になりました。