将A列和D列属性修改为数值:
myeole=CREATEOBJECT("Excel.application")
myeole.Workbooks.open(getfile("xls")) &&打开指定路径下的工作簿
myeole.Columns("A:A").NumberFormatLocal = "0.00_ "
myeole.Columns("D:D").NumberFormatLocal = "0.00_ "
myeole.ActiveWorkbook.close(.t.)
myeole.quit &&退出Excel
RELEASE myeole &&释放变量 以真正退出 Excel