Discussion :

[DonKnacki]

Bonjour à tous

J'ai un fichier Excle ou j'effectue un traitement via un macro qui me permet de construire les données que je souhaite ajouté à une de mes tables.
Les données sont correctement construtes donc pour le moment, l'ajout est possible mais manuel (copier la ligne depuis Excel, coller dans Access) : Un peu laborieux !
Je souhaite donc automatiser la chose mais je ne trouve pas comment faire;

J'ai essayer d'utiliser le menuer Importer des données extene mais j'ai une erreur:
"Une erreur est survenue lors de l'importation du fichier. Le fichier n'a pas été importer"

J'ai donc voulu passer par VBA en m'inspirant de mes code Access :

Code vba :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
insertSQL = "insert into latable(clo1, col3) values('values1', 'value2')"
CurrentDb.Execute insertSQL

Sur internet, j'ai vu l'utilsation de DoCmd.RunSQL

Code vba :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
insertSQL = "insert into latable(clo1, col3) values('values1', 'value2')"
DoCmd.RunSQL insertSQL

Mais dans les 2 cas, j'ai une erreur "Objet requis"
Je suppose qu'il ne connait pas de table "latable" ... Donc comment faire pour lui indiquer que cette table est sous access ?

[spaiku]

Bonjour,

tu ne peux pas utiliser CurrentDB dans Excel, vu que tu n'est pas dans une base de données.

Pour faire référence à ta base Access, tu peux écrire quelque chose comme :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim db As Database
Set db = OpenDatabase(Le_chemin_de_ton_mdb)

Ca nécessite d'activer la référence à DAO dans ton fichier Excel. Après, tu pourras utiliser db.Execute et tous les objets DAO comme si tu écrivais ton code dans Access.

[DonKnacki]

Exactement ce qu'il me fallait !
Merci à toi