Microsoft Access 掲示板

Microsoft Access 掲示板

parent.refreshでレコードとフィールドの位置が先頭になってしまう。 / 14
14
hatena 2023/06/01 (木) 11:55:15 >> 13

DAOで、フォームのレコードセットのコピーを生成して、それに対して更新する方法でどうだろう。

Private Sub Form_AfterUpdate()
    With Parent.Parent.Recordset.Clone 'フォームのレコードセットのコピー
        .Bookmark = Me.Bookmark 'カレントレコードを同期
        .Edit
        !chk = True
        .Update
    End With
    Parent.Parent!チェック1 = True
    Parent.Parent!コマンド6.Visible = True
End Sub

Chk はレコードソースのフィールド名
Chk１ はチェックボックス名(非連結)

チェックボックスは非連結なので、親フォームのレコード移動時にフィールド値を代入するなどの処理は別に必要。

ちょっと今出先なので、サンプルで動作確認してはしていませんので、うまくいくかは不確定。

通報 ...