困っています。助けてください。(3)-2

質問

再投稿し直します。
会社のシステム開発で思うように進まず困っています。
初心者なので丁寧な解説をいただけると助かります。

(3)カーソル指定したレコードを別フォームで開きたい
サブフォームにあるフィルター検索で複数絞ったレコードのうちカーソル選択したレコードを別フォームで開きたい。

サブフォームのフィルター検索はできるようになっているんですが
同じIDのレコードが2件出てきたときに先頭のレコードしか
別フォームで開けないのです。
カーソルで指定したレコードを開くように別フォームに移動するボタンに組み込みたいのですが、どのようなコードを打てばいいのか分かりません。

別フォームに画面切り替えをするボタンには
docmd openを使いcodeを指定していするコードを書いています。
サブフォームをsetfocusするのではうまく行かなかったのです。（※何かが抜けていたのかもしれませんが・・・。）

解決方法やコードなどをいただけると大変助かります。
詳しい方、何卒よろしくお願いいたします。

回答No.2

chayamati

今日は、Accessですよね、
　他の手続き言語（JAVA,C)もやっておられますか
前回のご質問(締切り済み）でコーディングに拘っておられっるようですが、
　ここではボックスのプロパティ―で解決できます
　VBAは必要ありません

「同じIDのレコードが2件出てきたときに先頭のレコードしか」は
解決しましたか
サブフォームを開いたとき下辺の、レコードセレクタは1/2になっていたらこの場所で
次のレコードへ移動できます。

回答No.1

chayamati

＞サブフォームのフィルター検索はできるようになっているんですが
同じIDのレコードが2件出てきたときに先頭のレコードしか
　別フォームで開けないのです。
　カーソルで指定したレコードを開くように別フォームに移動するボタンに組み込みたいのですが、どのようなコードを打てばいいのか分かりません。
フィルターをお見積書のIDで明細書を開くと複数の明細書を開けます
＞別フォームに画面切り替えをするボタンには
　docmd openを使いcodeを指定していするコードを書いています。
　サブフォームをsetfocusするのではうまく行かなかったのです。（※何かが抜けていたのかもしれませんが・・・。）
以下のコードはご参考になりますか
メニューフォームに血圧履歴登録(ラベルボックス)、履歴開始日、基準日(テキストボックス）を配置しています

Private Sub 血圧履歴登録_Click()
DoCmd.OpenForm "血圧履歴登録", , , "日付 Between forms!メニュー!履歴開始日 and forms!メニュー!基準日"
End Sub