RE:Leer Plantilla de Word
Espero te sirva de mucho esta rutina, solo es para abrir excel y una hoja determinada, y todavia estoy investigando como leer los datos de las celdas, en caso tu supieras hasmelo saber, Gracias y un beso desde Honduras
DECLARE
application ole2.obj_type;
workbooks ole2.obj_type;
workbook ole2.obj_type;
worksheets OLE2.OBJ_TYPE;
worksheet OLE2.OBJ_TYPE;
args ole2.list_type;
BEGIN
***** abre aplicacion excel ******
application:=ole2.create_obj('Excel.Application');
ole2.set_property(application, 'Visible', 'true');
workbooks:=ole2.GET_OBJ_PROPERTY(application, 'Workbooks');
args := OLE2.CREATE_ARGLIST;
OLE2.ADD_ARG(args,'archivo excel');
workbook := OLE2.INVOKE_OBJ(workbooks,'Open',args);
OLE2.DESTROY_ARGLIST(args);
worksheets := OLE2.GET_OBJ_PROPERTY(workbook, 'Worksheets');
/**** activa una hoja(sheet) determinada *****/
args := OLE2.CREATE_ARGLIST;
OLE2.ADD_ARG(args,'hoja o sheet');
worksheet := OLE2.GET_OBJ_PROPERTY(worksheets,'Item',args);
ole2.invoke(worksheet,'Select');
OLE2.DESTROY_ARGLIST(args);
ole2.release_obj(worksheet);
ole2.release_obj(workbook);
ole2.release_obj(workbooks);
ole2.release_obj(application);
END;