で、サブフォームのレコードセットは適当でも、これで書き換わるからいいと教えられました。
ACCESSを扱うなら非常に行儀が悪いですね。危惧している通りいろいろ問題が起きます。
まずはしっかりACCESSの作法を覚えるべきで、応用はその上に成り立つものでしょう
今は。帳票フォームの行が全部AさんやBさんになっているので、そこからまた頭を使って考えなければなりません(^^;
フォーム(サブフォーム)に必要とするすべてのデータを表示することができたら、フィルタープロパティを使ってデータの絞り込みができます。
サブフォームにはレコードソースを設定しておいて、親フォームのM_CMBの更新後イベントを次のようにします
Private Sub M_CMB_AfterUpdate()
Dim strFilter
If Not IsNull(Me!M_CMB) Then
strFilter = "個人ID=" & Me!M_CMB
End If
Me!F_個人別.Form.Filter = strFilter
Me!F_個人別.Form.FilterOn = True
End Sub
通報 ...