Macro to save Excel as txt

Is it possible to make a macro that copy data from a Excel sheet to a txt-file?

I need a macro that can copy to or save as txt, every time a save the Excel file, so it's always updated.
Also it has to save the txt-file next to the Excel-file, so I'm able to move it or copy the Excel-file to a new location.


I'll hope that someone can assist me?

Thank you

Something like the below, either to run as a macro or on , on an event

Please Login or Register  to view this content.

Thank you, it works perfectly!

Just one more thing. Is it possible to divide the data with "Tab" and not comma?

try changing the file format
FileFormat:=xlText

does that make a difference?

Attachment 654220

It still not working, maybe the txt file format is wrong. I need it to save as Unicode text file (.txt)
If i save it manually it works perfectly, but when I use the macro i got issues.
I'm using the .txt in Autodesk Revit as a Keynote

Please see my picture, the "Tab" it not the same, so I believe that it's what gives me problems?

Originally Posted by KOKOSEK

In my code:

Please Login or Register  to view this content.

That's perfect. It works now.

Thank you