Abrir archivo excel 2007 o 2010

[elaguna]

Ya tiene algún tiempo el tema pero si alguien llega con la misma duda le podría servir.

Empezado por ecfisa

Hola cmfab.

No sé que versión de Delphi estas usando.... mirá en estos enlaces:

• Working with Microsoft Excel (.xlsx) files in Delphi 2010
• Delphi unit to easily open Access and Excel files. Vas a tener que probarla (no uso Office).

Saludos.

El primer enlace es el que me pareció más claro y funciona muy bien, sólo un pequeño detalle falta:

Código Delphi [-]
begin
    newWorkbook := XLSXReader.Workbooks.Add('C:\book1.xlsx', GetUserDefaultLCID);
    objXLS := Excel_TLB.TExcelWorkbook.Create(nil);
    objXLS.ConnectTo(newWorkbook);
    objSheet := Excel_TLB.TExcelWorksheet.Create(nil);
    ...

falta inicializar la variable XLSXReader, y obviamente liberarla al final, entonces queda:

Código Delphi [-]
 begin
    XLSReader := Excel_TLB.TExcelApplication.Create(nil);

     newWorkbook := XLSXReader.Workbooks.Add('C:\book1.xlsx', GetUserDefaultLCID);
     objXLS := Excel_TLB.TExcelWorkbook.Create(nil);
     objXLS.ConnectTo(newWorkbook);
     objSheet := Excel_TLB.TExcelWorksheet.Create(nil);
    ...
    ...
    FreeAndNil(objXLS);
      FreeAndNil(objSheet);
    FreeAndNil(XLSXReader);

y es todo, y con eso funciona perfectamente.

Espero les sirva a todos, si hay alguna otra observación, háganla saber.

Saludos

Eduardo Laguna