>>>I am converting xslx to xls
>>>
>>>This is my code
>>>
>>>oXL = CreateObject("Excel.Application")
>>>oXL.Workbooks.Open("c:\citisprint\attachxls\latest.xlsx")
>>>oXL.ActiveWorkbook.Saveas("c:\citisprint\attachxls\latest.xls", 39)
>>>
>>>Conversion works fine except that the date in the xslsx file of 24/10/16 gets converted to 42667 in the xls file
>>>
>>>Any ideas
>>>
>>>Colin
>>
>>In Excel, {^2016-10-24} is just the representation, as a date, of the number 42667. Dates are numbers, as offsets from {^1899-12-30}. That is, if you add {^1899-12-30} to the number in the cell, you'll get the date displayed when the cell is formatted as a date.
>
>
>Sorry I dont understand how to do that
>
>
>oXL = CreateObject("Excel.Application")
>oXL.Workbooks.Open("c:\citisprint\attachxls\latest.xlsx")
>oXL.ActiveWorkbook.Saveas("c:\citisprint\attachxls\latest.xls", 39)
>
>How do I do that to column h in the active workbook lates.xls - what is the code I need to use
>
>Thanks
>
>Colin

I don't know if you can do that with with Excel automation, but if you are importing latest.xls into VFP, that is, as a table, just recreate the column value as a date.

ALTER TABLE latest RENAME COLUMN h TO hn
ALTER TABLE latest ADD COLUMN h D
UPDATE latest SET h = hn + {^1899-12-30}
ALTER TABLE latest DROP COLUMN hn