PatCatNat’s, site de Patrice MOREL
Vous êtes ici : Accueil » Inform@tic » Access » Import tous fichiers Txt d’un répertoire

Import tous fichiers Txt d’un répertoire

D 6 décembre 2007     H 13:26     A Patrice MOREL    


Le but est d’importer tous les fichiers Texte (*.txt) qui se trouve dans un répertoire donné (voire ses sous-répertoires compris).

Access 97 Access 97 | Non testé |
Access 2003 Access 2003 | Ok |

La base des codes vient du groupe de News microsoft.public.fr.access.

Table d’importation :
Créer une table comportant les même noms de champs que ceux de vos fichiers txt (Tous les fichiers txt doivent avoir les mêmes noms de champs et au même emplacement).

Enregistrement des paramètres d’importation :
Faire une première importation manuellement (Fichier/Données externes/Importer...).
Choisir l’option "Délimité" puis son "Délimiteur" et cochez la case "première ligne contenant le nom des champs".
Sélectionner "dans une table existante", puis mettre le nom de votre table (Dans l’exemple : T_MaTable).
Cliquer sur le bouton "Avancé" et paramétrez le "Informations sur les champs" au regard de votre table. Puis enregistrez sous en donnant un nom (Dans l’exemple : ExportTxtDelimit)

Créer un module (Dans l’exemple : Mod_ImporterTousFichiersTxt)
Son nom n’influence en rien sur le fonctionnement.
_

Appel de la fonction (Dans mon exemple sur click d’un bouton) :

Dans la même rubrique

18 février 2010 – Liste déroulante

26 janvier 2010 – Requête croisée

5 mars 2008 – Evènement sur Onglet

7 février 2008 – Astuces et pièges VBA

8 décembre 2007 – Envoi de mails