Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Servers
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

 
 
Herramientas Buscar en Tema Desplegado
  #2  
Antiguo 01-10-2003
Hidalgo Hidalgo is offline
Registrado
 
Registrado: sep 2003
Ubicación: Cochabamba
Posts: 6
Poder: 0
Hidalgo Va por buen camino
No era un problema de XP, es otro el problema, cuando tengo una hoja excel abierta.....es ahi donde me carga los datos y no en la hoja que estoy abriendo.

Mi codigo es el siguiente:
procedure TFDesdeExcel.BitBtn1Click(Sender: TObject);
var
WorkBk : _WorkBook; // Define a WorkBook
WorkSheet : _WorkSheet; // Define a WorkSheet
NomFich : String;
i, j: Integer;
begin

NomFich := 'E:\temp\prueba.xls'
XLApp.Connect;
XLApp.WorkBooks.Open(NomFich,EmptyParam,EmptyParam,EmptyParam,EmptyParam, EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,0);
WorkBk := XLApp.WorkBooks.Item[1];
WorkSheet := WorkBk.WorkSheets.Get_Item(1) as _WorkSheet;
// Activas
For i := 5 to 14 do // Filas
For j := 4 to 16 do // Columnas
WorkSheet.Cells.Item[i,j].Value:=i+j ;
// Pasivas
For i := 19 to 28 do // Filas
For j := 4 to 16 do // Columnas
WorkSheet.Cells.Item[i,j].Value:=i+j ;

XLApp.Visible[0] := True;
XLApp.Disconnect;

//********************************************

Estado.Caption:='Se grabó correctamente.';
//------------------------------------------------------------------------------


end;

No se como puedo hacer que por mas hojas abiertas de excel, grabe la informacion en la hoja que yo le indico.
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 13:57:40.


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