Just one thought, you have converted the data into a Table? SFileName = Split(Split(Filename, sep)(UBound(Split(Filename, sep))), '.')(0) MsgBox - 1 & ' records were exported to' & Filenameīut when I press the button I just get a box that comes up with 400 in it.
The Code I am using on the button is listed below:įilename = Application.GetSaveAsFilename(InitialFileName:='myrange.xml', fileFilter:='XML Files(*.xml), *.xml') I have an Excel sheet, I am using Microsoft Excel for Mac 2011, with two columns of text data that I want to export to a simple format XML file using a macro attached to a button on the sheet.