All posts tagged FileSystemObject

ECRIRE UN FICHIER TEXTE EN VBA AVEC LE FSO FILESYSTEMOBJECT

Pour écrire dans un fichier texte en VBA, il existe plusieurs façons. Manipuler l’objet FileSystemObject (le FSO) est recommandé, car cet objet permet beaucoup de manipulations avec les fichiers, répertoires, etc…

Pour utiliser l’objet FileSystemObject, il faut ajouter la référence « Microsoft Scripting Runtime » au projet VBA. Si vous déclarez correctement vos variables comme dans l’exemple ci-dessous, vous aurez droit à une aide précieuse (l’auto-complétion des formules). Ajouter la référence permet également d’utiliser l’explorateur d’objets F2.

Voici le bout de code (à adapter selon les besoins) pour écrire un fichier texte.

Sub FSO_OUT()
Dim FSO As New FileSystemObject
Dim MonFichier As TextStream
Set MonFichier = FSO.CreateTextFile("C:\test.txt")
MonFichier.WriteLine ("Début de fichier")
MonFichier.Write ("Début de Phrase")
MonFichier.Write (" : ")
MonFichier.Write ("Fin de Phrase")
MonFichier.Close 
End Sub
Top
Page 1 of 1

Contactez-nous contact@expert-data.fr

EXPERT data, solutions pour TPE/PME et grands comptes