Debo realizar una exportación de datos a Excel (*.xlsx)...

[TiammatMX]

...pero tengo algunos problemas.

¡Buen día/tarde/noche!, requiero información y ayuda para resolver una pequeña particularidad.

Tengo un programa que debe realizar una exportación de datos a Excel (*.xls) , de tres columnas obtenidas de SQL Server. Actualmente lo realiza cómodamente con ésta línea de conexión:

cConn := "DBQ="+cNomArc + ";Driver={Microsoft Excel Driver (*.xls)};ReadOnly=0;MaxScanRows=0;FirstRowHasNames=1;DriverId=278"

Donde cNomArc es el nombre del archivo que contendrá los nuevos datos.

Probé con la línea:

cConn := 'Driver={Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb)};DBQ='+cNomArc+';Mode=ReadWrite;ReadOnly=False;Extended Properties="Mode=ReadWrite;ReadOnly=False;HDR=YES"'

recomendada en alguno de los sitios de desarrolladores que frecuento, y además de obtener un archivo ridículamente pequeño (7 Kb), no es legible para Excel marcando "Excel no puede leer el archivo 'x' porque el formato de la extensión...", ya saben...

Y ahora el problema es que necesito exportarlo a *.xlsx para "modernizar" la salida de los datos; en el otro extremo (es decir, la importación de datos) tengo ésta conexión plenamente funcional y leyendo cómodamente archivos *.xlsx:

cConn := 'Driver={Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb)};DBQ='+cNomArc+';Extended Properties="Mode=Read;ReadOnly=True;HDR=YES"'

Obviamente, he probado con varias conexiones la exportación, hasta que me topé con una recomendación emanada directamente de Microsoft donde dice que la exportación DEBE NECESARIAMENTE ser en formato Excel 97-2003 *.xls para ser viable..., pero debo exportarlo en *.xlsx funcional si deseo continuar con el diseño del sistema...

¿Alguien tendrá alguna idea que pueda servirme? Agradezco de antemano su paciencia y comprensión.

[roman]

Podrías intentar acceder a Excel vía OLE, tú sabes, usando OleVariants y COM y llenando las celdas una a una. El problema ahí sería la velocidad. Si es una tabla muy grande podría ser algo lento. Incluso, se me ocurre que podrías poner los datos en CSV en el portapapeles y luego, mediante OLE, pegar el contenido en el archivo xlsx.

LineComment Saludos

[TiammatMX]

Originally Posted by roman

...Podrías intentar acceder a Excel vía OLE, tú sabes, usando OleVariants y COM ...

Efectivamente, el tema de la velocidad es crucial. Si por exportar 2,000 registros se tarda en el método actual casi un minuto, me lo reclaman cada vez que pueden...

Gracias.

[Casimiro Noteví]

Un bucle recorriendo un dataset y enviando a un fichero de texto del tipo csv es rapidísimo y muy simple de hacer. ¿No te viene bien ese formato?

[TiammatMX]

Originally Posted by Casimiro Notevi

Un bucle recorriendo un dataset y enviando a un fichero de texto del tipo csv es rapidísimo y muy simple de hacer. ¿No te viene bien ese formato?

No, Casimiro. Lamentablemente para mí, DEBE SER NECESARIAMENTE EN XLSX..., el caso del CSV ya está contemplado desde el principio de los tiempos de éste programa (en el que estoy trabajando)...

[roman]

Acabo de pegar 2600 registros en formato CSV en una hoja xlsx en un abrir y cerrar de ojos. A ese tiempo (abrir y cerrar de ojos) únicamente tendrías que añadir el tiempo de formar los datos CSV (debe ser imperceptible) crear el archivo y guardarlo. Te aseguro que tardará menos de un minuto y el archivo final estará en formato xlsx. Lo del CSV en memoria el cliente ni lo sabrá.

LineComment Saludos