" dbFailOnErrorを追加します CurrentDb.Execute strSQLの最後に テーブルの更新を防ぎますが、エラーはスローしません "
SetWarningsの場合、目に見えるエラーなしで更新に失敗する可能性があります オフになっています。 SetWarningsを切り替えたときに異なる結果が得られるかどうかを確認します 更新ステートメントを実行する直前にオンにします。
DoCmd.SetWarnings True
CurrentDb.Execute strSQL, dbFailOnError