S Sub Guest 13 Novembre 2004 #1 Bonjour ! Je souhaiterais ecrire le contenu entier d'un tableau dans un fichier : Open "C:\TOTO.TOT" For Output As 1 Print #1 TAB(i)(i = 1 to 7) Close #1 Quelqu'un connait la syntaxe ; celle ci-dessus est incorrecte en VBA. Merci
Bonjour ! Je souhaiterais ecrire le contenu entier d'un tableau dans un fichier : Open "C:\TOTO.TOT" For Output As 1 Print #1 TAB(i)(i = 1 to 7) Close #1 Quelqu'un connait la syntaxe ; celle ci-dessus est incorrecte en VBA. Merci
M michel Guest 14 Novembre 2004 #2 bonjour Sub tu peux tester cette adaptation Sub tableauVersFichierTexte() Dim Fichier As String Dim Tableau(7) Dim i As Byte For i = 0 To 7 Tableau(i) = "Ligne" & i Next i Fichier = "C:\monFichier.Txt" Open Fichier For Output As #1 For i = 0 To 7 Print #1, Tableau(i) Next i Close End Sub bonne journée MichelXld Vote positif 0 Vote négatif
bonjour Sub tu peux tester cette adaptation Sub tableauVersFichierTexte() Dim Fichier As String Dim Tableau(7) Dim i As Byte For i = 0 To 7 Tableau(i) = "Ligne" & i Next i Fichier = "C:\monFichier.Txt" Open Fichier For Output As #1 For i = 0 To 7 Print #1, Tableau(i) Next i Close End Sub bonne journée MichelXld
S Sub Guest 14 Novembre 2004 #3 Merci à toi Michel ! Je pensais qu'il y a avait une methode plus directe ! Vote positif 0 Vote négatif