Exportar Datagrid a Excel
al exportar un datagrid a excel, funciona todo bien, pero se me presenta el siguiente problema. Cuando el campo a exportar es una fecha, en vex de escribir en excel por ejemplo 30-10-2003, me escribe 37908.
Es un problema de formato pienso, no de conexión, porque el resto de los datos los exporta perfecto. La instrucción que uso es la siguiente:
ApExcel.Cells(Fila, 10).Formula = Adodc1.Recordset.Fields("Fecha")
donde adodc1 es el ADO que maneja el datagrid y Fecha es el campo donde aparece la fecha
obviamente se hicieron las declaraciones respectivas para el objeto AppExcel
Dim ApExcel As Object
Set ApExcel = CreateObject("Excel.application")
Es un problema de formato pienso, no de conexión, porque el resto de los datos los exporta perfecto. La instrucción que uso es la siguiente:
ApExcel.Cells(Fila, 10).Formula = Adodc1.Recordset.Fields("Fecha")
donde adodc1 es el ADO que maneja el datagrid y Fecha es el campo donde aparece la fecha
obviamente se hicieron las declaraciones respectivas para el objeto AppExcel
Dim ApExcel As Object
Set ApExcel = CreateObject("Excel.application")
