Pasar Datos a una Hoja de Calculo

Pasar Datos a una Hoja de Calculo

Postby caducca » Sat Dec 08, 2007 3:14 pm

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
caducca
 
Posts: 104
Joined: Wed Mar 08, 2006 2:24 pm

Postby alex_cyr » Sat Dec 08, 2007 6:00 pm

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.
alex_cyr
 
Posts: 77
Joined: Wed Jun 28, 2006 6:38 pm
Location: Chihuahua


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 31 guests