Saving a txt file

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

HI
On the below code I would like to add a variable that uses the value of a
text box from a form:
So the form is AABB the text box is NAME

I have tried to change the code below to
Set a = fs.CreateTextFile("c:\GL1025\& ABB.NAME &".txt", True) but it does
not work
coul you please help?

Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile("c:\GL1025\testfile.txt", True)
For Each Cell In Range("A1:A65000")
s = Cell.Value
a.WriteLine (s)
Next
a.Close


End Sub
 
There appears to be a typo :
Set a = fs.CreateTextFile("c:\GL1025\& ABB.NAME &".txt", True)
Set a = fs.CreateTextFile("c:\GL1025\" & ABB.NAME & ".txt", True)
Click to expand...

try specifing the text propery:
Set a = fs.CreateTextFile("c:\GL1025\& ABB.NAME.TEXT &".txt", True)
Click to expand...
 
I do not believe that there is.

You probably have to either manually insert them or delete the hidden ones.
 
Hi ..

Some issus.

One place you write AABB and in the code you write ABB

("c:\GL1025\& ABB.NAME &".txt",

you should add one "

("c:\GL1025\" & ABB.NAME &".txt",



diacci1st skrev:
 
Back
Top