Urgent: Créer 1 macro sous excel pour ouvrir fichier texte

polo1006 Messages postés 1 Date d'inscription jeudi 4 décembre 2003 Statut Membre Dernière intervention 4 décembre 2003 - 4 déc. 2003 à 17:06
cs_croussillon Messages postés 1 Date d'inscription samedi 24 janvier 2004 Statut Membre Dernière intervention 18 février 2004 - 18 févr. 2004 à 02:05
Bonjour!!

Je suis actuellement en stage et je dois réaliser une macro sous excel.
Je dois ouvrir un fichier texte donné par un appareil de mesure méteo. L'ouverture du fichier texte sans macro fonctionne bien mais lorsque je fais l'enregistrement, l'ordinateur ne prend pas en compte l'ouverture de ce fichier et créé d'ailleurs un nouveau fichier et donc par conséquant ne l'enregistre pas dans la macro!!!! ;-(

Enfin bref, je veux juste pouvoir ouvrir un fichier txt
(le choisir si possible avec une boite de dialogue)
et le mettre en colonne avec toutes les données de
ce fichier.

Le fichier txt a pour valeur des lignes en tabulation mais excel le convertit naturellement en colonne...

Merci à ceux qui me répondront et merci pour ce site vraiment très clair!!!!! :-)

1 réponse

cs_croussillon Messages postés 1 Date d'inscription samedi 24 janvier 2004 Statut Membre Dernière intervention 18 février 2004
18 févr. 2004 à 02:05
J'espère que ce petit bout de code pourra t'aider :

Dos = "chemin d'accès exact au fichier"

Workbooks.OpenText Filename:=Dos _
, Origin:=xlWindows, StartRow:=1, DataType:=xlFixedWidth, FieldInfo:= _
Array(Array(0, 1), Array(4, 9), Array(8, 1), Array(12, 9), Array(13, 1), Array(15, 9), _
Array(16, 1), Array(22, 9), Array(26, 1), Array(37, 9), Array(38, 1), Array(43, 9), Array( _
44, 1), Array(55, 9), Array(56, 1), Array(66, 9), Array(67, 1), Array(68, 9), Array(69, 1))
0
Rejoignez-nous