PDA

Ver la Versión Completa : Exportando a Excel celdas con Formato


ruedabeat2003
12-08-2008, 22:18:48
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
Rango := Libro.Range['A1, A10'];
Rango.NumberFormat := '000000';
Libro.Cells[1,1] := 23;


Fuente (http://msdn.microsoft.com/es-es/library/microsoft.office.tools.excel(VS.80).aspx)

ruedabeat2003
12-08-2008, 23:46:21
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. ;)