OpenEuphoria

Load this: http://www.rapideuphoria.com/excel_10.zip

There is a demo showing what to do (ExcelObjects.exw). In short:

include eucom/eucom.ew 
include Excel10.ew 
include ExcelFuncs.ew 
include win32lib.ew 
 
object App, wbs, wb, wss, ws 
 
App = startExcel() 
wbs = getWorkbooksCollection(App) 
wb  = createWorkbook(wbs) 
wss = getWorksheetsCollection(wb) 
ws = selectWorkSheet(wss, 1) 
object val = getCell(ws, "B1") 
-- adapt next line to value type 
VOID = message_box(sprintf("%.2f", {val}), "Info", 0) 
closeExcel(App) 
release_com() 

Jean-Marc