Import plusieurs fichiers xls sur une table access via macro

bonjour,

j'ai 16 fichiers *.xls de même format 'nom,prénom,sexe' mais de nom différents.

je voulais les importer sur ma table Access via un macro.

Pouvez vous m'aider a élaborer la fonction en vb pour l'import automatique par bouton de tous ces fichiers.

le chemin des fichiers: c:\bande\input.
ma table ''crat''.

merci beaucoup de votre aide

Bonjour,

Citation:

---

Envoyé par kaynan

Pouvez vous m'aider a élaborer la fonction en vb pour l'import automatique par bouton de tous ces fichiers.

---

Vous voulez dire VBA ?

Avez vous commencé quelque chose ?

;)

bonjour

c'est ca en vba :lol:

Bonjour kaynan, Chtulus,

kaynan je crois que ceci ferait ton affaire:

Code:

---

1 2 3 4 5 6 7

Dim strFichier As String   strFichier = Dir("C:\bande\input\*.xlsx") Do Until strFichier = "" DoCmd.TransferSpreadsheet acImport, "TableDestination", "c:\bande\input\" & strFichier strFichier = Dir Loop

---

Bonne journée