Hi All,

Just a quick one,

I would like to change the following recorded macro such that on my desired sheet I can run the macro and it will automatically save the data as a *.txt where '*' is the same as the current workbook name, in this case 'Results1'. I would also like the *.txt file to be saved to the current folder in which the worksheet.xls is present, in this case TEST.

Sub save_txt_current_file_and_location()
ChDir _
"C:\Documents and Settings\xxxx\My Documents\TEST\Results1"
ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\xxxx\My Documents\TEST\Results1.txt" _
, FileFormat:=xlText, CreateBackup:=False
End Sub
Hopefully this can be done - I'm sure it can be, I just don't have a clue how .

Thanks in advance!

Cheers