Question about saving to text delimited file

[srosk]

Hi there. I have the following, which saves the current tab as 12.txt.

Is there a way to specify the path? Is there a way to make it stop and not overwrite the file / prompt a message if 12.txt already exists in the location?

And finally, I notice that when it saves, it basically closes out the macro and then the active file is 12.txt. I want to save my results on the macro file first, so to combat this, do I need to first save the macro, then execute a modified version of the following file? Is there a way to close the txt file and automatically re-open my macro? Maybe I'm missing something though?

ThisWorkbook.SaveAs "12", FileFormat:=xlTextWindows

 

[mikerickson]

Try this instead

If Not (Application.Dialogs(xlDialogSaveAs).Show("12", 3)) Then
    MsgBox "user cancel"
End If

Fiddle with the 3 if the default format isn't exactly what you want.

 

[srosk]

This is good, thank you. Is there a way to specify the folder location?

Also, once I hit save, excel exits 1231.xlsm and enters 12.txt. Is it possible to prevent that from happening? Would like to keep the macro active.

 

[GR00007]

Instead of "12" use your full path: "C:\Some\Directory\12.txt"
There's probably a close statement for the macro, look for ".Close" in the code till you find it. You could comment that line out if you want.