Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Servers (https://www.clubdelphi.com/foros/forumdisplay.php?f=9)
-   -   Ayuda exportando datos a EXCEL (https://www.clubdelphi.com/foros/showthread.php?t=81240)

semita 25-10-2012 16:47:21

Ayuda exportando datos a EXCEL
 
Hola Como estan. Me encuentro con un Error que normalmente no me ocurría. Quiero trabajar en excel y lo hago así.

Código Delphi [-]
Libro := Excel.Workbooks.Add(Null, 0);
Hoja := Libro.Sheets[1] as _Worksheet;
Excel.Visible[1]:=true;
Hoja.Cells.Item[2,5]:=' Semita ';

Todo Funciona bien. El problema surge cuando trato de recorrer Celdas.

Código Delphi [-]
for I := 0 to 10 do
  begin
     Hoja.Cells.Item[I,2]:= I;
  end;

Ahi es el problema... Hoja.Cells.Item[I,2] me dice que la I debe ser un Objeto OleVariant. Por eso el error. No se como declararlo.

Ya probé declarandolo:
var
I : Olevariant;

pero el problema es que la I no se puede incrementar.

En VB normal me acepta como Integer.

Espero me entiendan. Utilizo. delphi 2010 Win7 ult.

semita 25-10-2012 17:04:14

Solucionado
 
Ups... ya encontré el Error. El error era mío.

Código Delphi [-]
for I := 0 to 10 do
Hoja.Cells.Item[I,2]...

Pues no existe la Fila 0(cero) entonces el for debe iniciar desde 1.
Código Delphi [-]
for I := 1 to 10 do
Hoja.Cells.Item[I,2]...

Y así si funciona correctamente...


La franja horaria es GMT +2. Ahora son las 22:29:12.

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