Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Exportando a Excel celdas con Formato (https://www.clubdelphi.com/foros/showthread.php?t=59096)

ruedabeat2003 12-08-2008 22:18:48

Exportando a Excel celdas con Formato
 
Hola, se trata de un simple reporte que exporta mis resultados a una hoja de Excel, el problema es que requiero que ciertas columnas lleven un formato especifico, por ejemplo, una de las columnas debe llevar cantidades a 6 digitos, por lo cual debo rellenar con ceros a la izquierda las cantidades, preparo mi variable con la instrucciòn 'FormatFloat', pero al pasar el dato a la celda en Excel pierdo mi formato, se pierden los ceros a la Izq. COmo puedo mantener el formato? Mis intrucciones son las siguientes:

piezas := FormatFloat('000000',sp_RepAnex24expression_6.AsFloat);
xlApp.Cells.Item[num_renglon-1,7] := piezas; // Aqui pierdo el formato

Gracias de antemano. :confused::confused::confused:

ContraVeneno 12-08-2008 22:52:38

Código Delphi [-]
   Rango := Libro.Range['A1, A10']; 
   Rango.NumberFormat := '000000';
   Libro.Cells[1,1] := 23;

Fuente

ruedabeat2003 12-08-2008 23:46:21

Gracias por el tip
 
De acuerdo a lo indicado, estoy utilizando la propiedad 'NumberFormat' y antes de crear la celda le doy formato:
xlApp.cells.Item[num_renglon-1,7].numberformat := '000000';
xlApp.Cells.Item[num_renglon-1,7] := piezas ;

Ya me respeto el formato al crear la celda, :D:D:D:D.

Muchas gracias por el tip, saludos. ;)


La franja horaria es GMT +2. Ahora son las 22:00:59.

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