|
|
Question : Foxpro and using Excel 2010 as an object
|
|
|
|
Part of my main Foxpro program converts Excel files to Excel 97/95 to be appended later on in other parts of the program. Here is my conversion code:
PROCEDURE excelconv oExcel = CREATEOBJECT("Excel.Application") xlworkbook = oExcel.Workbooks.Open(ALLTRIM(insert_config.location)+"\"+m_file) xlworkbook.SaveAs(ALLTRIM(insert_config.location)+"\"+LEFT(ALLTRIM(m_file),LEN(ALLTRIM(m_file))-4)+".xls",43) *RELEASE oExcel xlworkbook.saved = .t. xlworkbook.close oExcel.quit RETURN
This has worked for clients that have 2003 and 2007 Excel.
I just upgraded to 2010 and was runing a test and got this error on the "saveas" line:
OLE IDispatch exception code 0 from Microsoft Excel: Unable to get the SaveAs property of the workbook class..
I attempted to change the file format to -4143 instead on 43. The program processed the SaveAs OK, but the file gave me an "Invalid Microsoft Excel File format" when I attempted to append.
I appreciate your help on this. Thanks
|
|
|
|
Answer : Foxpro and using Excel 2010 as an object
|
|
Perhaps try xlExcel9795 instead of 43..
|
|
|
|