Discussion :

[Guiggs]

Bonjour,

En pièce-jointe vous trouverez mon fichier Excel et ma Base de données Access !!

Mon problème c'est que je veux exporter des tableaux Excel vers Access, mon code s'exécute correctement mais il fait l'exportation pour seulement 2 de mes tableaux Excel !!

Et je comprend pas pourquoi il exporte pas les autres...

Merci d'avance

Cordialement,
Guiggs

[tee_grandbois]

Bonsoir,
ta base Access a des relations avec intégrité référentielle contraignante. Les 2 tables Genre et Zone n'ont pas de contrainte d'intégrité avec d'autres tables, c'est pour cela qu'elles sont les seules à avoir été importées.
Par exemple, tu ne peux pas créer un enregistrement dans Arrondissement puisqu'elle contient la clé étrangère Idville de Ville qui n'est pas encore créée.
Tu devrais peut-être lancer tes requêtes dans cet ordre :

Code :

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

1
2
3
4
5
6
7
8
MaBase.DoCmd.TransferSpreadsheet acImport, 8, "Genre", Fichier, True, "Genre!B1:C50"
MaBase.DoCmd.TransferSpreadsheet acImport, 8, "Zone", Fichier, True, "Zone!B1:C50"
MaBase.DoCmd.TransferSpreadsheet acImport, 8, "Ville", Fichier, True, "Ville!B1:D50"
MaBase.DoCmd.TransferSpreadsheet acImport, 8, "Arrondissement", Fichier, True, "Arrondissement!B1:E50"
MaBase.DoCmd.TransferSpreadsheet acImport, 8, "Vacance", Fichier, True, "Vacance!B1:F50"
MaBase.DoCmd.TransferSpreadsheet acImport, 8, "Film", Fichier, True, "Film!B1:D50"
MaBase.DoCmd.TransferSpreadsheet acImport, 8, "Cinema", Fichier, True, "Cinema!B1:G50"
MaBase.DoCmd.TransferSpreadsheet acImport, 8, "Seance", Fichier, True, "Seance!B1:J50"

pour voir si c'est mieux.

[Guiggs]

Bonsoir,

Merci mon problème est résolu !!

J'avais pratiquement le même ordre que vous !!

Cordialement,

Guiggs