Voici un exemple de mise à jour avec DAO:
Dim db As DAO.Database
'Ouvre la base
Set db = OpenDatabase(App.Path & "\Efd97.mdb")
'Exécute une requête de mise à jour
db.Execute "UPDATE NomTable SET NomTable.NomColonne = 'xxxxxx';"
'Ferme la base et libère la mémoire
db.Close
Set db = Nothing