VB Code to save as XML Spreadsheet

[Desu Nota from Columbus]

I tried searching google and this website for a code and nothing worked.

I am opening notepad documents in excel and running a macro I recorded, and then I am manually clicking, save as-->xml spreadsheet, using the same file name.

How do you make this happen automatically? I need a code to add to the end of the macro I recorded.

 

[pbornemeier]

Define sPath as a string and set it equal to the folder full path name (ending with a \). Example: sPath = "C:\Foo\Bar\August\"

and change

ActiveWorkbook.SaveAs Left(ActiveWorkbook.Name, InStrRev(ActiveWorkbook.Name, ".") - 1) & ".xml", FileFormat:=46

to

ActiveWorkbook.SaveAs sPath & Left(ActiveWorkbook.Name, InStrRev(ActiveWorkbook.Name, ".") - 1) & ".xml", FileFormat:=46

 

[Desu Nota from Columbus]

Thanks a bunch, I am slowly starting to amass coding concepts. Thanks for the help again.

I got an email you responded to my last post, but it took me until now to find it was located on Page 2...