Accueil > Forum > > > > Probleme fin de fichier texte
 Probleme fin de fichier texte
jeudi 27 novembre 2008 à 11:50:13 |
Probleme fin de fichier texte
Jeremy014
|
Bonjour,
J'ai fait une macro sous excel pour lire un fichier texte et en extraire des informations.
J'ai presque tout le temps une erreur car je pense que dans ma boucle while not, la fin du fichier est mal/pas detectee...
Dim strline As String
i=1
Open file For Input As #1
While Not EOF(1)
If Left(strline, 1) = "A" Then
Fleet = Mid(strline, 27, 1)
Line Input #1, strline
Point = Mid(strline, 5, 4)
End If i = i + 1
Cells(i, 3) = Point
Cells(I, 5) = Fleet
Line Input #1, strline Wend
Merci d'avance pour votre aide...
|
|
jeudi 27 novembre 2008 à 12:04:08 |
Re : Probleme fin de fichier texte
Renfield
|
tu lis deux lignes par deux lignes...
si tu as un nombre pair, ca va... sinon, boum !
|
|
jeudi 27 novembre 2008 à 13:13:57 |
Re : Probleme fin de fichier texte
Jeremy014
|
Oui car j'ai toujours un nombre de ligne pair dans ce fichier...
Tu vois un autre probleme?
J'ai lu sur un autre post du forum auquel je crois que tu as participe, qu'il peut y avoir un soucis avec la commande Line Input si le fichier n'est pas binaire...
|
|
Cette discussion est classée dans : fichier, fin, input, texte, strline
 Répondre à ce message
 Sujets en rapport avec ce message
lecture de fichier texte et concatenation [ par SEBOBS ]
bonjour, je lis un fichier texte, les donnees ont la forme suivante : a,b,c,d,e,f j ai sur plusieurs ligne a,b,c,,e, et a,b,c,d,, ou a,b,c sont ident
extraction des information d'un fichier [ par pegguy ]
Private Sub Form_Load()'0n Error Resume Next 'Les erreurs sont ignorees'Open "c:\it\stat\STAT01-05 2001\stat26e.txt" For Input As #1Open "c:\it\stat\S
extraction des information d'un fichier [ par pegguy ]
Private Sub Form_Load()'0n Error Resume Next 'Les erreurs sont ignorees'Open "c:\it\stat\STAT01-05 2001\stat26e.txt" For Input As #1Open "c:\it\stat\S
extraction des information d'un fichier [ par pegguy ]
Private Sub Form_Load()'0n Error Resume Next 'Les erreurs sont ignorees'Open "c:\it\stat\STAT01-05 2001\stat26e.txt" For Input As #1Open "c:\it\stat\S
Écrire a la fin d'un fichier texte [ par jptou16 ]
Bonjour, je voudrais savoir comment écrire a la fin d'un fichier texte!merci!
ecrire à fin de chaque ligne dans un fichier autre que texte [ par fredfrompoitiers ]
j'ai un fichier *.dat, je voudrais ajouter un caractere comme @ en fin de ligne.comment fait-on?merci d'avance!fred
lire un fichier texte depuis la fin [ par flyerflo ]
Bonjour,Je fait un programme qui doit comparer deux fichiers texte qui contiennent des nombres et je dois comparrer des nombres du premier ficher avec
Encore un drole de fichier texte [ par crocmorts ]
1ere ligne :" DATE ","HEURE"," POSTE","NU.COMPOSE"," ANNUAIRE EXTERNE ","DUREE DE","DUREE DE C"2eme ligne:"01/05/02","01:08","201 ","6
Lire un fichier texte à partir d'une certaine ligne [ par crocmorts ]
Salut, voila mon probleme, je souhaiterais lire un fichier texte à partir d'une ligne X. J'ai recherché ds le forum mais j'ai pas trouvé mon bonheur.
Détection de fin de ligne [ par bladeur ]
Salut tout le monde. Je suis nouveau en VB et j'ai un petit prog à faire:Le prog consiste à extraire des données séparer par des "!" dans un fichier
 Livres en rapport
|
Derniers Blogs
 PAS D'INTELLITRACE SUR MON SITE WEB DANS IIS !PAS D'INTELLITRACE SUR MON SITE WEB DANS IIS ! par Etienne Margraff
J'ai récemment eu un problème pour obtenir l'intelliTrace sur un site web dans IIS. Il n'y avait pas de message d'erreur, rien dans le journal d'évènement Windows, et après 3 appels à une voyante, 2 visites chez un marabou, j'ai failli me résign...
Cliquez pour lire la suite de l'article par Etienne Margraff OFFICE 365 - SHAREPOINT ONLINE, QUELQUES LIMITATIONSOFFICE 365 - SHAREPOINT ONLINE, QUELQUES LIMITATIONS par junarnoalg
De nombreuses entreprises font le choix de SharePoint Online, service fourni au travers de l'offre de Microsoft Office 365. S'il est vrai que ce choix apporte un grand nombre d'avantages; rapidité de mise en œuvre, disponibilité, large couvertu...
Cliquez pour lire la suite de l'article par junarnoalg PRéSENTATION DES API REST DE WINDOWS AZURE : LISTER LES COMPTES DE STORAGEPRéSENTATION DES API REST DE WINDOWS AZURE : LISTER LES COMPTES DE STORAGE par richardc
http://www.c2idotnet.com/articles/presentation-des-api-rest-de-windows-azure-lister-les-comptes-de-storage
Désolé pour "toto", mais c2i existait avant blogs.developpeur.org et c'est mon site "officiel" ;-) ...
Cliquez pour lire la suite de l'article par richardc [HTML5] SLIDES ET DéMOS : AUTOUR DU W3C , NOUVEAUX STANDARDS ET WEB MOBILE (LILLE)[HTML5] SLIDES ET DéMOS : AUTOUR DU W3C , NOUVEAUX STANDARDS ET WEB MOBILE (LILLE) par Gio
Très bonne après-midi passée lors cette conférence avec le W3C, organisée par L' Inria sur les nouveaux standards, ce Mardi 14 Février, on sent vraiment que çà bosse au W3C, et l'avenir est très très prometteur pour le HTML5, notamment ...
Cliquez pour lire la suite de l'article par Gio
Forum
 FONCTION EXCEL VBAFONCTION EXCEL VBA par samanta26
Cliquez pour lire la suite par samanta26 RE : VITESSERE : VITESSE par ossama261988
Cliquez pour lire la suite par ossama261988
Logiciels
 DocTranslate (V3.1.0.0)DOCTRANSLATE (V3.1.0.0)DocTranslate est un traducteur de document Microsoft Word, PowerPoint et Excel. Il permet d'autom... Cliquez pour télécharger DocTranslate Tribler (2012)TRIBLER (2012)Tribler est un client pair à pair (P2P/Peer-to-Peer) open source avec la capacité de regarder des... Cliquez pour télécharger Tribler OneSwarm (2012)ONESWARM (2012)Le peer-to-peer qui protège votre vie privée, c'est OneSwarm.
Ce logiciel de peer-to-peer crypté... Cliquez pour télécharger OneSwarm PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)PONAMEDIA TV DEVIENS HELLLOOO FLASH
LA TV SUR VOTRE ORDINATEUR.
Toute une plateforme Multi... Cliquez pour télécharger PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO Academy System (17.2.1.0)ACADEMY SYSTEM (17.2.1.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System
|