Bonjour à tous,

Voilà mon problème, j'aimerais écrire dans un fichier texte (CSV) mais je ne comprend pas comment faire pour incrementer les lignes de mon fichier texte (et pas réecrire à chaque fois sur les memes lignes)

Voila mon bout de code :

Private Sub Command1_Click()
Dim f As Integer

f = FreeFile

Open "c:\monfichier.csv" For Output As #f
Print #f, "petit texte"
Print #f, "yes"
Print #f, "ok"
Close #f

End Sub

Serait-il possible de remplacer ce #f par un chiffre que je pourrai incrémenter à chaque écriture ?
 Est-ce que quelqu'un aurait une idée ??

Merci
Jack.

Salut Jacky7

Le fichier csv est bien créé avec les 3 lignes (j'ai testé avec Excel qui ouvre les fichiers .csv)

Le #f n'a rien à voir avec les numéros de ligne
C'est le numéro de canal sous lequel est ouvert le fichier et on utilise Freefile pour trouver un canal libre pour ce fichier

Voir l'aide en ligne de VB pour Print #

La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi.

GRENIER Alain

Salut Jacky7

Le fichier csv est bien créé avec les 3 lignes (j'ai testé avec Excel qui ouvre les fichiers .csv)

Le #f n'a rien à voir avec les numéros de ligne
C'est le numéro de canal sous lequel est ouvert le fichier et on utilise Freefile pour trouver un canal libre pour ce fichier

Voir l'aide en ligne de VB pour Print #

La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi.

GRENIER Alain

Désolé pour le double envoi

La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi.

GRENIER Alain