Page 1 of 1

Pasar Datos a una Hoja de Calculo

Posted: Sat Dec 08, 2007 3:14 pm
by caducca
Hola Foro:
Quisiera saber si es posible enviar datos a un archivo XLS (Excell) ya creado y en lugares determinados del mismo. Por ejemplo a la ubicacion Hoja1!C9 y si es factible con que clase lo debo hacer.
Desde ya muchas gracias
Saludos
Carlos A. Ducca

Posted: Sat Dec 08, 2007 6:00 pm
by alex_cyr
carlos, te anexo un ejemplo:

oxls:=TOleAuto():New( "Excel.Application" )
oxls:WorkBooks:OPen('c:\mihoja.xls')
oHoja := oxls:sheets:item(1)
oHoja:activate()

oHoja:Cells(5,8):value := 'DATO 1'
oHoja:Cells(6,8):value := 'DATO 2'
oHoja:Cells(7,8):value := 'DATO 3'
oHoja:Cells(8,8):value := 'DATO 4'

oxls:visible := .t.


saludos
Alex.