Salut Dominique !
il y a une erreur dans l'aide en ligne.
je te propose ceci :
Option Explicit
Sub EcrireFichierTexteV2()
Dim f1 As Integer
Dim NomF As String
Dim Ch01 As String
Dim Ch02 As String
Dim Ch03 As String
NomF = "MonTexte.txt"
Ch01 = "Moi, Chita"
Ch02 = "Toi, Zorro"
Ch03 = "Nous, contents"
f1 = FreeFile ' obtenir num
Open NomF For Output As #f1
Write #f1, Ch01 ' zone de texte
Write #f1, Ch02 'deux
Write #f1, Ch03 'Trois
Close #f1
End Sub
Bonne journée, et bon courrage,
Hélène
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
