VBA sous ACCESS champs plusieurs valeurs

Bonjour,

Je travaille avec VBA sur ACCESS
Je tente d'ajouter des livres à ma base de données mais je tombe toujours sur le même problème : erreur impossible d'ajouter plusieurs champs de valeurs.
J'ai testé plusieurs méthodes, demandé sur le site du zéro mais personne ne semble décidé à me répondre. Peut-être que la chance me sourira ici :)

Voici mon code :

Set oDb = CurrentDb()

insertion = "INSERT INTO Publication (Nom_publication, Genre, date_parution, domaine_recherche, id_auteur, tiree)"
insertion = insertion & " VALUES ( '" & nompublication.Value & "','" & genre.Value & "',#" & Format(dateparution.Value, "mm\/dd\/yyyy") & "#,'" & Replace(domainerecherche.Value, "'", "''") & "','" & idchercheur.Value & "','" & tiree.Value & "');"

Debug.Print insertion

oDb.Execute (insertion)

Mon debug print produit :
INSERT INTO Publication (Nom_publication, Genre, date_parution, domaine_recherche, id_auteur, tiree) VALUES ( 'hbt','articles',#01/08/1191#,'Physique, Chimie, Sciences de la Terre et de l''Univers','1','hg');

J'ai d'abord pensé à un problème d'apostrophe mais même en l'enlevant cela persiste...

Merci pour tout aide !