Macro importer fichiers txt dans excel

TOT127 Messages postés 898 Date d'inscription   Statut Membre Dernière intervention   -  
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,
je suis embarassé car j'ai 500 fichiers de données .txt avec séparateur virgule et je dois les mettre dans excel...
J'aimerais ne pas avoir à le faire à la main. Je sais que des macro existent, j'en ai essayé plusieurs mais je n'ai pas réussi. Pouvez vous m'aider à faire la macro me permettant d'automatiser le travail ?
merci beaucoup,
A voir également:

2 réponses

cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
Bonjour,

Voici un exemple, il suffit de mettre le classeur dans le répertoire où ce trouve les fichiers texte.
J'ai mis 3 fichiers texte pour faire les essai.
Les fichiers texte sont copiés sur chaque onglet qui prend le nom du fichier:

http://www.cjoint.com/c/FFjiS4UeCsQ
1
TOT127 Messages postés 898 Date d'inscription   Statut Membre Dernière intervention   96
 
woo merci ! je vais étudier ça et je reviens vers toi te dire comment j'ai réussi! :)
0
TOT127 Messages postés 898 Date d'inscription   Statut Membre Dernière intervention   96
 
je suis entrain de regarder votre fichier. Je pense le garder pour importer des fichiers txt à l'avenir, car il y a la macro dedans. néanmoins, quand je tente de lancer la macro pour qu'elle avale 3 de mes fichiers txt, mis dans le dossier du fichier excel, j'obtiens ça: erreur 1004 et débogage > l'erreurétant: "Fichier = Application.GetOpenFilename("Text Files (*.txt), *.txt")" (ce qui est surligné dans ta macro).
0
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
Verifier que les fichiers ont bien l'extension txt!

Si c'est une autre extension corriger la macro en remplaçant txt par l'autre extension.
0
3IR3 Messages postés 901 Date d'inscription   Statut Membre Dernière intervention   228
 
Bonjour,

Vous devriez faire une sauvegarde de vos fichiers texte, en prendre 1 au hazard et changer son extension (.txt) en (.csv)
Essayez ensuite de l'ouvrir avec Excel/LibreOffice Calc et il vous demandera de définir l'option de séparateur. Cochez uniquement le point virgule et voilà normalement c'est bon.
0
TOT127 Messages postés 898 Date d'inscription   Statut Membre Dernière intervention   96
 
Oui mais alors qu'advient il de tous les autres fichiers ?
0
3IR3 Messages postés 901 Date d'inscription   Statut Membre Dernière intervention   228
 
Si ça marche correctement pour un, vous n'avez plus qu'à renommer les 500 fichiers .txt (en gardant toujours une sauvegarde des originaux) en .csv

Pour cela vous les placer dans un dossier de votre choix, vous naviguez jusqu'à ce dossier dans la console en ligne de commande (cd pour ouvrir et dir pour afficher le contenu du répertoire) et une fois que vous êtes positionné sur le dossier qui contient tous les .txt vous faîtes:

ren *txt *csv
0
TOT127 Messages postés 898 Date d'inscription   Statut Membre Dernière intervention   96
 
je vais essayer, merci! Puis je vous demander comment ouvrir la console en ligne de commande sur excel ?...
0
TOT127 Messages postés 898 Date d'inscription   Statut Membre Dernière intervention   96
 
(je suis sur mac)
0
3IR3 Messages postés 901 Date d'inscription   Statut Membre Dernière intervention   228
 
Ahh je ne connais pas du tout mac désolé, la commande ci dessus est pour la console Windows
0