Programación General > Visual Basic 6.0 e inferiores

 Re: Ayuda con Exportar

(1/1)

Amenoar:
Tengo que exportar los datos desde una Base de Datos a Excel. El codigo lo tengo, pero una de las columnas a exportar contiene fechas y al pasarlo a Excel me lo pasa con formato general y no de "Fecha". Supongo que es con el: "objExcel.ActiveSheet", pero no lo puedo solucionar.
Desde ya muchas Gracias.
Amenoar

J.M.Movilla:
Existen muchas fórmulas, dependiendo de cómo hagas la confección de la hoja de cálculo, pero en general vienen a coincidir en definir el formato de celda para que en lugar de presentar el formato general te muestre el específico que te interese; por ejemplo en tu caso podrías hacer:

        Dim xEr As Excel.Range
        Set xEr = xEs.Cells(nFila, nCol)
        xEr.ColumnWidth = 10
        xEr.NumberFormat = "dd-mm-yyyy"

con lo cual el grupo de celdas adquirirían el formato de fecha indicado.

Perdona si te hago retocar el código, hecho a vuela pluma...

Saludos y suerte

Amenoar:
Muchas Gracias por la rapidez de la respuesta, voy a probar y te cuento.

Amenoar:
Ni siquiera tuve que modificar el codigo. Copie una linea de lo que me mandaste y lo pegue. Quedo asi:
objExcel.ActiveSheet.Columns("A").NumberFormat = "dd-mm-yyyy"
Muchas Gracias nuevamente.
Amenoar:beer:

Navegación

[0] Índice de Mensajes