Comment accèder à la dernière ligne d'un fichier texte, et écrire des données à partir de cette dernière ligne ?
 
Merci.

' Pour accéder a un fichier texte et ajouter des ligne a la suite de ce fichier, il faut procéder comme ça:
 
' Tu commence par ouvrir ton fichier text(le For Append signifie ouverture en mode Ajout):    
Open "CheminCompletDeTonFichiertxt" For Append As #1
     
' Tu écrit la ou les lignes a écrire a la fin de ton fichier
Print #1, "Text a écrire"
 
' Tu referme ton fichier texte
Close #1
 
 
' Pour lire une ligne :
 
' Tu ouvre ton fichier en mode lecture
Open "CheminCompletDeTonFichiertxt" For Input As #1
 
' Tu lit une ligne de ton fichier et tu la stoke dans une variable de type string:
Line Input #1,Ligne1
' Apres cette instruction, le curseur saute a la ligne donc pour lire la ligne suivante :meme chose
Line Input #1,Ligne2
 
' Tu ferme ton fichier
Close #1
 
voila, bon courage.

Merci beaucoup.  

Comment peut-on enregistrer un fichier txt (par exemple) dans le meme dossier que celui du .xls ?  
(Et ce meme si on deplace le .xls et que l'on relance le programme)
 
 
Merci.

   Pour enregistrer ton fichier text dans le meme dossier que ton fichier excel il faut que tu indique le chemin relatif de ton fichier avec ".\" :
 
' Ceci ouvrira le fichier txt présent dans le dossier courant de ton fichier xls
 
Open ".\NomduDoc.txt" For Append As #1  
 
   Et si ce fichier texte n'existe pas dans ton dossier courant, il sera automatiquement créer !
     
   J'espere que ça répond a ta question.Salut.

Merci ca repond parfaitement à ma quetion.
   
THX

coucou ptibat