Exportar DataGridView a Excel sin depender de la versión de Office

Durante el desarrollo de un sistema de información en algún momento será necesario exportar los datos de un Grid a Excel y realmente es una tarea sencilla, no obstante, se viene un gran problema cuando hay actualizaciones de versiones, cambio en la configuración regional o sencillamente cambio de sistema operativo; esto es lo que he sufrido en los últimos días y también muchos colaboradores, por tal razón, decidí crear una librería sencilla de implementar y de usar.

La librería en cuestión es la siguiente:

https://mega.nz/file/L7oxhSLB#5KoMAOLgE2cnwiABbJdZiqt0ZBiDMBJQOe1VFv1DM84

Entonces vamos a lo que nos interesa ¿Cómo usarla?

Primero: Debe crear una referencia a su proyecto.

Importante mencionar que deberán tener la versión Framework 4.0 como mínimo.

Segundo: A continuación, cree una instancia haciendo referencia a la clase

Dim Export_Excel As New gridToExcel.bstt.ToExcel

Tercero: Para finalizar en algún botón o función llame al método “Export_Grid_To_Excel” que realizaran todo el trabajo

Export_Excel.Titulo = "TITULO MOSTRADO EN VENTANA EXAMINADOR DE ARCHIVOS"
Export_Excel.Export_Grid_To_Excel(Grid, "TITULO MOSTRADO EN MENSAJES")

Y así de simple exportamos los datos de un Datagridview a Excel

Importante: Debe tomar en cuenta que el archivo generado está basado en XML por lo que el office consultara si confía en los datos que contiene, está acción se puede desactivar en la configuración de Excel.

Definir tipo de columnas

Si por alguna razón necesitamos exportar a Excel, pero que cada columna tenga su propio tipo de datos, solo debemos llamar en primero lugar a la propiedad “Tipear” y definirla en true. Quedaría entonces lo siguiente:

Export_Excel.Tipear = true
Export_Excel.Titulo = "TITULO MOSTRADO EN VENTANA EXAMINADOR DE ARCHIVOS"
Export_Excel.Export_Grid_To_Excel(CONTROL_GRID, "TITULO MOSTRADO EN MENSAJES")

Exportar Datatable a Excel

Tambien puedes exportar directamente desde un Datatable usando el método Export_Datatable_To_Excel

Export_Excel.Titulo = "TITULO MOSTRADO EN VENTANA EXAMINADOR DE ARCHIVOS"
Export_Excel. Export_Datatable_To_Excell(DATATABLE, "TITULO MOSTRADO EN MENSAJES")

Y bueno eso, fue todo, como podrán notar es una implementación sencilla pero poderosa, capaz de gestionar grandes volúmenes de información y de forma rápida y sobre todo no depende de ninguna versión de Excel para funcionar.