Importer liste de fichiers texte dans excel
Résolu
Aquhydro
Messages postés
172
Date d'inscription
Statut
Membre
Dernière intervention
-
pijaku Messages postés 13513 Date d'inscription Statut Modérateur Dernière intervention -
pijaku Messages postés 13513 Date d'inscription Statut Modérateur Dernière intervention -
Bonjour,
J'ai des fichiers textes en colonnes avec des données à l'intérieur, les données sont variables mais les colonnes sont identiques.
J'ai 88 de ces fichiers.
Ils sont bien rangés dans mon ordinateur avec un rangement qui donne:
V:\mes_documents\These\Projet_gocad\Data_out\Sx\Sx_slopes_groupy.txt
avec x qui va de 1 à 11 et y de 1 à 8.
Les fichiers sont organisées en colonnes séparées par des tabulations.
J'aurais besoin d'ouvrir tout ces fichiers textes d'un coup sous excel, et je n'arrive pas a formuler la boucle qui devrait ressembler à :
Je n'ai quasiment aucunes connaissance en syntaxe vba...
Une fois que ça sera ouvert, je n'aurais plus que quelques copier coller à effectuer.
Merci beaucoup pour votre aide précieuse.
J'ai des fichiers textes en colonnes avec des données à l'intérieur, les données sont variables mais les colonnes sont identiques.
J'ai 88 de ces fichiers.
Ils sont bien rangés dans mon ordinateur avec un rangement qui donne:
V:\mes_documents\These\Projet_gocad\Data_out\Sx\Sx_slopes_groupy.txt
avec x qui va de 1 à 11 et y de 1 à 8.
Les fichiers sont organisées en colonnes séparées par des tabulations.
J'aurais besoin d'ouvrir tout ces fichiers textes d'un coup sous excel, et je n'arrive pas a formuler la boucle qui devrait ressembler à :
for x = 1 to 11
for y = 1 to 8
Open V:\mes_documents\These\Projet_gocad\Data_out\Sx\Sx_slopes_groupy.txt avec séparateur en colonnes.
Je n'ai quasiment aucunes connaissance en syntaxe vba...
Une fois que ça sera ouvert, je n'aurais plus que quelques copier coller à effectuer.
Merci beaucoup pour votre aide précieuse.
3 réponses
-
S'il vous plait... ?
-
Bonjour,
1- pour ouvrir un fichier txt :
http://jacxl.free.fr/cours_xl/cours_xl_jac.html#fichiers_texte
2- pour boucler sur un String variable :
For x = 1 to 11 For y = 1 to 8 Debug.Print "V:\mes_documents\These\Projet_gocad\Data_out\S" & x & "\S" & x & "_slopes_group" & y & ".txt" Next y Next x
🎼 Cordialement,
Franck 🎶 -
Merci beaucoup.
