Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Converting excel
Message
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
01566268
Message ID:
01566444
Views:
59
>>>>>Hi
>>>>>
>>>>>I get regular Excel files .xls but 97-2003 workbook - is there anyway I can can append them to a table or convert them to a csv file format automatically
>>>>
>>>>http://www.sweetpotatosoftware.com/spsblog/2008/09/30/UsingExcel2007FileFormatsInVFP90.aspx
>>>
>>>Sadly couldn't get this to work
>>
>>I saw your other message. Is it any option for you to automate Excel so that Excel converts the XLSX into XLS?
>>lcFile=fullpath(lcFile)
>>Erase (Forceext(lcFile,'xxx'))
>>ox=Createobject('excel.application')
>>owb=ox.Workbooks.Open(lcFile)
>>lcFile=Forceext(lcFile,'xxx')
>>ox.DisplayAlerts= .F.
>>owb.SaveAs(lcFile,39) && XLS
>>owb.close()
>>owb=.null.
>>ox=.null.
>>Release owb
>>Release ox
>
>Now that does exactly what I need - converts to workbook 95 so that i can import - Tore you are a star
>
>Colin

You're welcome.
Previous
Reply
Map
View

Click here to load this message in the networking platform