" ajout dbFailOnError
À la fin de CurrentDb.Execute strSQL
Empêche le tableau de mettre à jour mais ne lance aucune erreur "
Cela pourrait échouer à se mettre à jour sans erreur visible si SetWarnings
a été éteint. Vérifiez si vous obtenez un résultat différent lorsque vous changez SetWarnings
sur immédiatement avant d'exécuter l'instruction de mise à jour.
DoCmd.SetWarnings True
CurrentDb.Execute strSQL, dbFailOnError