In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

Clase TExcel de Bingen

Foro público de Xailer en español
Responder
pacoelche
Mensajes: 141
Registrado: Mar Jul 11, 2006 10:32 am

Clase TExcel de Bingen

Mensaje por pacoelche »

Buenas tardes:

He visto que Bingen publicó hace unos años una clase para grabar ficheros Excel.

¿Alguien podría enviarme un pequeño ejemplo de su uso? Por ejemplo, como grabar un par de columnas y que cada una tenga un par de filas.

Muchas gracias anticipadas
pacoelche
Mensajes: 141
Registrado: Mar Jul 11, 2006 10:32 am

Re: Clase TExcel de Bingen

Mensaje por pacoelche »

Trasteando ya he hecho algo, como por ejemplo:

LOCAL J, EXCEL:=SHGetFolder()+"\PRUEBA EXCEL.xlsx"
WITH OBJECT TExcel():New(self)
:NewDoc(EXCEL)
:Say({1,1},"COLUMNA 1",,clBlue,clYellow,,,,,.T.,.T.)
FOR J:=2 TO 5
:Say({J,1},J-1)
NEXT
:SaveAs(EXCEL)
:Close(EXCEL)
END WITH


He conseguido cambiar el color y negrita.

Tengo un problema con las fechas. ¿Cómo indico en el SAY que es una fecha? Ya que ahora al abrir el Excel me toma una fecha como si fuese una resta.

Gracias
pacoelche
Mensajes: 141
Registrado: Mar Jul 11, 2006 10:32 am

Re: Clase TExcel de Bingen

Mensaje por pacoelche »

Ya lo he averiguado:

:Say({J,2},FECHA,"@")
Avatar de Usuario
bingen
Mensajes: 565
Registrado: Lun Jul 07, 2014 8:17 pm
Ubicación: Bilbao
Contactar:

Re: Clase TExcel de Bingen

Mensaje por bingen »

Perdona no he visto tu mensaje hasta hoy, :roll:

Te envío la clase actualizasda y con ejemplos de uso al final de la misma.
BiSoft Desarrollo de software profesional
http://www.bisoft.es
Avatar de Usuario
bingen
Mensajes: 565
Registrado: Lun Jul 07, 2014 8:17 pm
Ubicación: Bilbao
Contactar:

Re: Clase TExcel de Bingen

Mensaje por bingen »

Perdona no he visto tu mensaje hasta hoy, :roll:

Te envío la clase actualizada y con ejemplos de uso al final de la misma.
TExcel.zip
(27.57 KiB) Descargado 142 veces
BiSoft Desarrollo de software profesional
http://www.bisoft.es
Responder