>I need to create a comma delimited text file from an Excel 97 spreadsheet using OLE Automation in VFP. I can't seem to find an example of how to do this.
>
>I know enough to instantiate Excel and open the workbook and navigate to the worksheet using the Excel object but how do I find the command to Save As comma delimited? Something like oWs.SaveAs("Myfile.txt",42) where 42 is the arbitrary number denoting the file type.
>
>Documentation is sparse. Thanks for your help!
>
>-JT
#Define xlCSV 6
#Define xlCSVMac 22
#Define xlCSVMSDOS 24
oExcel = createobject("Excel.application")
With oExcel
.Workbooks.open(Getfile('XLS'))
With .ActiveWorkbook
.Activesheet.SaveAs(sys(5)+curdir()+"myExcelCSV.txt",xlCSV)
.Saved = .t.
Endwith
.Quit
Endwith
Cetin