どんぐり
2020/10/14 (水) 17:13:32
0029a@1c915
こちらの件について、「MsgBox "コードが実行されました"」を試してみました。
Private Sub Form_AfterUpdate()
MsgBox "コードが実行されました"
If Me.Parent!最新購入日 = Me.最新購入日 Then
Else
Me.Parent!最新購入日 = Me.最新購入日
End If
End Sub
①サブフォームの購入日を更新
②メインフォームに最新購入日が反映される
③フォームを閉じる
④「コードが実行されました」とメッセージボックスが表示される
⑤「1回前の」更新結果が反映される
①サブフォームの購入日を更新
②メインフォームに最新購入日が反映される
③サブフォームの別のテキストボックスなどを更新
④フォームを閉じる
⑤「コードが実行されました」とメッセージボックスが表示される
⑥「今回の」更新結果が反映される
通報 ...
(※⑤⑥の更新結果は、コントロールソース(テーブル)への反映の件です)
何度も何度も実験していたら、常に上の動きではありませんでした。
そして時々「1899/12/30」になります。理解ができず…何度もすみません。
もう1つの質問でご回答いただいている、「保存する」をじっくり確認して、試みてみます。