Microsoft Access 掲示板

サブフォームでのDlookup / 11

17 コメント
views
4 フォロー
11
hiroton 2020/07/08 (水) 09:02:11 600c4@f966d >> 5

で、サブフォームのレコードセットは適当でも、これで書き換わるからいいと教えられました。

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
通報 ...