Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Automatización en Excel Starter 2010 (https://www.clubdelphi.com/foros/showthread.php?t=88832)

CFPA86 09-08-2015 02:43:50

Automatización en Excel Starter 2010
 
Hola amigos en dias pasados les pedi una ayuda para pasar unos datos de excel a una tabla paradox (en su momento me funciono) con ayuda de Newtron, lo resolvi ahora con un nuevo sistema win7, D7, excel starter 2010, necesito nuevamente de este codigo, pero me saca un error creando el objeto excel, aca el codigo
Código Delphi [-]
.........
Var
   Appexcel : variant;
   N, hoja     : smallint;
   Contenido : string;
 Begin
   Appexcel := CreateOleObject('Excel.Application');   aca es donde me saca el error
   AppExcel := WorkBooks.Open('nombre.xls');
.........
Resto del codigo
El error dice:
Cita:

(project xxxx raised exception class EOleSysError with message 'cadena clase no valida')
Quisiera que alguien de ustedes me dijera xq se me puede presentar este error y si es posible como solucionarlo para proseguir con mi proyecto, muchas gracias.

nlsgarcia 09-08-2015 04:18:49

CFPA86,

Cita:

Empezado por CFPA86
...Excel Starter 2010...error creando el objeto excel...CreateOleObject('Excel.Application')...

:rolleyes:

Microsoft Excel Starter 2010, no soporta macros ni automatización COM.

Revisa esta información:
Espero sea útil :)

Nelson.

CFPA86 09-08-2015 19:51:13

De acuerdo a lo que me dice nlsgarcia, opte por desinstalar el ms office starter e instalar el office 2010, edite mi libro de excel en dicho office, grabe como xlsx y xls, correcto ya me pasa de donde me sacaba el error (crea el objeto excel), pero al continuar el codigo en la linea
Código Delphi [-]
Contenido := appExcel.WorkBooks[1].Worksheets[hoja].cell[n,1];
Dicho error dice:
Cita:

Project xxx raised exception class EOleException with message 'method cell' not supported by automation object
Recurro a ustedes haber si me colaboran, en esto y muchas gracias nuevamente

CFPA86 09-08-2015 21:23:43

Hola, sobre el ultimo error que me presentaba, era xq la palabra cell estaba mal escrita era cells
Linea mal escrita
Código Delphi [-]
  Contenido := appExcel.WorkBooks[1].Worksheets[hoja].cell[n,1];
  // Linea bien escrita
  Contenido := appExcel.WorkBooks[1].Worksheets[hoja].cells[n,1];
Ya funciona, de todas formas reitero mis gracias para todos.

Casimiro Notevi 09-08-2015 21:36:40

Recuerda poner los tags al código fuente, ejemplo:



Gracias :)


La franja horaria es GMT +2. Ahora son las 15:43:03.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi