Discussion :

[asirier]

Bonjour,

Je souhaite parcourir en sequentiel un fichier ligne par ligne, tout bête !
Malgré la présence d'un 0D0A, il me lit l'intégralité du fichier !
par contre si je l'ecris via un ordre VBA cela fonctionne bien,
d'ou vient le bug ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Open Application.ThisWorkbook.Path & "\abcd.txt" For Input As #1
While Not EOF(1)
 line  Input #1, 
Wend
Close #1

merci d'avance pour l'aide

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
(
'  Open Application.ThisWorkbook.Path & "\abcd.txt" For Output As #2
'  Print #2, "ABCD" '
'  Print #2, "EFGH" '
'  Print #2, "IJKL" '
'  Close #2
)

[LouiMz]

Bonjour,

J'ai rencontré le même problème sur les imports de fichiers textes. Pour remédier à cela j'ouvre le fichier texte avec Word puis je le ré-enregistre dans un second fichier. Et les lignes sont alors parfaitement séparées.

En espérant avoir aidé.

Je me demande si la lecture séquentielle ne reconnait pas soit le Carriage Return soit le Line Feed. Des idées?
Car je rencontre ce problème sur la majorité des fichiers textes.