Как создать текстовый файл программой Excel VBA?
прошу прощения. ответ лежал в хелпе:
Sub CreateAfile()
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile("c:\testfile.txt", True)
a.WriteLine ("This is a test.")
a.Close
End Sub