End of file

[julien]

Bonjour à tous,

Quelqu'un pourrais-t-il me dire comment utiliser l'instruction EOF. J'ai compris qu'il fallait utiliser un argument filenumber, mais comment connaitre ce numéro pour un fichier déjà ouvert ?

Je voulais utiliser cette fonction dans une boucle

Do while !EOF

....

loop

Cela peut-il marcher ou dois-je utiliser une boucle FOR ? (le problème est que je connais pas le nombre de ligne et que j'en insert au fil du programme...)

Merci d'avance

Julien

 

[pyrof]

bonjour,

il faut préciser EOF de quoi? EOF(1)

voir ducumentation:
Dim InputData
' Ouvre le fichier afin d'y entrer des données.
Open "MONFICH" For Input As #1
Do While Not EOF(1) ' Vérifie si la fin du fichier est atteinte.
Line Input #1, InputData ' Lit les lignes de données.
Debug.Print InputData ' Imprime dans la fenêtre Exécution.
Loop
Close #1 ' Ferme le fichier.

 

[julien]

C'est bien ce que j'avais cru comprendre mais en l'occurence, j'ai plusieurs fichiers ouverts. Comment savoir s'il a le numéro 1 ou le 2 ou...

existe-t-il une fonction pour connaitre ce numéro à partir du nom de fichier ?

 

[pyrof]

quand tu ouvres le fichier par :

Open "MONFICH" For Input As #1

#1 est le numéro donc eof(1)