Blog de Francisco Vicente » DataGridView a Excel en Visual C#

05/06/07: DataGridView a Excel en Visual C#

Categoría: General

Publicado por: fvicente

Visto: 8798 veces

Muchas veces tenemos el requerimiento de exportar los datos de un DataGridView hacia Microsoft Excel. Acá les muestro una método que cumple con este requerimiento desarrollado en Visual C#. Yo siempre oculto los Primary Keys de los registros retornados por eso he considerado que solo se exporte las columnas visibles.
Desde luego que he colocado código para formatear un poco el resultado (Seguro que esto es en una novedad porque no había ejemplos en C#).

public void Exportar( System.Windows.Forms.DataGridView dgvDatos)
{

try
{
string temp;
int iColumnas=0;
Application xlsApp = new Application();
//xlsApp.DisplayAlerts = false;
Worksheet xlsSheet;
Workbook xlsBook;
xlsApp.Visible = false;

xlsBook = xlsApp.Workbooks.Add(true);
xlsSheet = (Worksheet)xlsBook.ActiveSheet;

for (int iCol = 0; iCol < dgvDatos.Columns.Count; iCol++)
{
if (dgvDatos.Columns[iCol].Visible == true)
{
xlsSheet.Cells[1, iCol] = dgvDatos.Columns[iCol].HeaderText;
iColumnas++;
}

}

for (int iRow = 0; iRow < dgvDatos.Rows.Count; iRow++)
{
for (int iCol = 0; iCol < dgvDatos.Columns.Count; iCol++)
{
if (dgvDatos.Columns[iCol].Visible == true)
{
temp = dgvDatos[iCol, iRow].Value.ToString();
if (IsDate(temp) == true && dgvDatos.Columns[iCol].HeaderText == "Dia")
{
temp = Convert.ToDateTime(temp).ToShortDateString();
}
xlsSheet.Cells[iRow+2, iCol] = temp;
}
}
}

//Definir el rango y aplicarle un formato.
Range rango = xlsSheet.get_Range(xlsSheet.Cells[1, 1], xlsSheet.Cells[dgvDatos.Rows.Count+1,iColumnas ]);
rango.Cells.AutoFormat(XlRangeAutoFormat.xlRangeAutoFormatList2 ,
Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value);

xlsSheet.Columns.AutoFit(); //Ajusta ancho de todas las columnas
xlsApp.Visible = true;
//xlsApp.Quit();
}
catch (Exception e)
{ throw e; }
}

No se olviden de agregar:
using Microsoft.Office.Interop.Excel;
using System.Reflection; //para el valor missing

Etiquetas :

item rate
Total de Votos: 10 - Rating: 4.20

Ingrese su correo electrónico para suscribirse a los comentarios de este artículo:

Comentarios

Juany escribió:

Sabe que su pagina es muy buena y me a sevido de mucho sus block especialmente el de c# pero ahora tengo un problema con el datagridview no se sime pueda acolitar es que no puedo convertir die una columna a ultracombobox pues estoy utilizando el infragistics pero no me ha salido luego intente con una columna combobox normal pero no me sale lo que quiero es que en la columna a cada fila se me cargen datos de distintos datatable

14/06/07 18:56:18

Arcangel asesino escribió:

Se agradece ya tenia tiempo buscando como hacer esto y si es bueno saber que era tan sencillo :P no tendras por ahi como construir gráficas desde C# en excel

29/02/08 15:45:14

Francisco escribió:

No me funciona, me dice que las librerias de office no se encuentran y tengo Office instalado.

hay que hacer alguna otra referencia???

Saludos

21/04/08 12:17:16

loser escribió:

Acabo de entontrar una manera más simple de poder grabar la info, pero desde un datatable, y como los dataGrid tienen un datasource que puede ser un dataTable, creo que tambien funcionara:

parametros:
Obviamente hacer las referencias a Office y Excel, luego el using:
/* use un alias para la escritura.*/
using msXls = Microsoft.Office.Interop.Excel;

El datatable contiene 3 columnas y 4 filas. Y para este ejemplo el libro excel debe estar creado (hasta el momento si lo creo desde codigo me da problemas de permiso :( )

private void GrabarArchivo()
{
msXls.Worksheet worksheet;
msXls.Workbook workbook;

/* Inicializa Excel. */
msXls.ApplicationClass applicationClass = new msXls.ApplicationClass();
/* Apertura del libro _ fullPath: la ruta completa del libro. */
workbook = applicationClass.Workbooks.Open
(_fullPath, 0, false, 5, "", "", true, msXls.XlPlatform.xlWindows, "\t", false, false, 0, true, 1, 0);

/* 1º Hoja del Libro. */
worksheet = (msXls.Worksheet)workbook.Worksheets.get_Item(1);

/* Recorrer los dataRows que esten en el dataTable. */
int fila = 1;
foreach (DataRow dr in tablaDeDatos.Rows)
{
/* ItemArray[Indice], el valor de la "celda" del dataTable. */ ((msXls.Range)worksheet.Cells[fila, 1]).Value2 = dr.ItemArray[0].ToString();
((msXls.Range)worksheet.Cells[fila, 2]).Value2 = dr.ItemArray[1].ToString();
((msXls.Range)worksheet.Cells[fila, 3]).Value2 = dr.ItemArray[2].ToString();
fila++;
}

/* Commit para salvar la información dle libro. */
workbook.Save();

/* Cerrar por completo el Excel. */
workbook.Close(null, null, null);
applicationClass.Quit();
applicationClass = null;
GC.Collect();
/* Cerrar por completo el Excel. */
}

Eso. Espero que les sirva de algo.

30/04/08 21:56:20

whaly escribió:

Buenas... estoy tratando de probar estos codigos, pero no me reconoce el using Microsoft.Office.Interop.Excel;
Alguna idea de porque es? tengo el visual estudio 2008...

gracias

20/05/08 09:56:20

David Guijarro escribió:

Buenas. Me ha ido muy bien el ejemplo, pero al principio me generaba un error cuando le asignaba el valor del header de la columna y el valor del contenido de la celda. Al final lo he solucionado modificando el codigo de dentro de los bucles for que recorren las columnas de esta forma:

xlsSheet.Cells[1, iCol + 1] = dgvDatos.Columns[iCol].HeaderText;

xlsSheet.Cells[iRow+2, iCol + 1] = temp;

04/06/08 04:16:25

Jorge Luis escribió:

Hola necesito mostrar graficos en un formulario a partir de los datos d mi BD valga la redun... podrian decirme como hacer esto?

23/06/08 11:29:26

Alexis escribió:

Esta linea queda asi

for (int iRow = 0; iRow < dgvDatos.Rows.Count-1; iRow++)

Saludos

08/07/08 00:49:22

Alexis Leiva escribió:

Y finalmente para que no se caiga el programa en una celda sin valor asignado haria lo siguiente:

try{
temp = dgvDatos[iCol, iRow].Value.ToString();
}catch { temp = ""; }

Saludos
Alexis

08/07/08 01:04:09

Alberto escribió:

Hola,
he probado tu código para cerrar por completo la Excel, pero si consulto el administrador de tareas, compruebo que áún sigue corriendo el proceso EXCEL.exe.

Alguien conoce alguna forma de para el proceso por completo?

Un saludo.

21/08/08 09:37:45

marel escribió:

hola estoy aprendiendo a programar en c# y el profe es malisimo necesito ayuda

03/11/08 19:47:29

Carlos Arias G. escribió:

El ejemplo esta de pelos funciona todo bien, pero tiene un problema o error, al terminar el programa en el administrador de tareas sigue cargado excel, esto ocasiona que si se ejecuta varias veces el proceso de llenado del archivo, se terminara la memoria...
Alguna sugerencia??

12/01/09 18:56:38

Darin escribió:

Hola Francisco, sabes soy nueva en esto de programar, es por el cual queria pedirte que me envies tu codigo pero para ejecutarlo ya que lo copio pero nada que no sale, por favor ayudame tengo un trabajo, que es guardar los datos de mi DataGridview en un archivo Excel.xls en la hoja3 y no me sale abu!!!!! ayudame...:::

11/12/09 19:45:41

karfart escribió:

Muchas gracias, buen código, efectivamente hay un error al asignar los valores, se corrige como dice en los primeros comentarios, hice una modificación para que no queden las columnas vacias cuando no estan visibles y omiti las lineas del formato, dejo el código corregido y completo a continuacion

public void ExportToExcel(DataGridView dgvDatos)
{
try
{
string temp;
Microsoft.Office.Interop.Excel.Application xlsApp = new Microsoft.Office.Interop.Excel.Application();
Microsoft.Office.Interop.Excel.Worksheet xlsSheet;
Microsoft.Office.Interop.Excel.Workbook xlsBook;
xlsApp.Visible = false;

xlsBook = xlsApp.Workbooks.Add(true);
xlsSheet = (Microsoft.Office.Interop.Excel.Worksheet)xlsBook.ActiveSheet;

int iCol = 0;
foreach (DataGridViewColumn column in dgvDatos.Columns)
{
if (column.Visible)
xlsSheet.Cells[1, ++iCol] = column.HeaderText;
}

foreach(DataGridViewRow row in dgvDatos.Rows)
{
iCol = 0;
foreach (DataGridViewColumn column in dgvDatos.Columns)
{
if (column.Visible)
{
temp = dgvDatos[column.Index, row.Index].FormattedValue.ToString();
xlsSheet.Cells[row.Index+2, ++iCol] = temp;
}
}
}

xlsSheet.Columns.AutoFit();
xlsApp.Visible = true;
}
catch (Exception e)
{ throw e; }
}

26/12/09 10:46:06

Leone Valiente escribió:

Finalmente Para lo que comienza el codigo queda asi:

using leo = microsoft.Office.Interop.Excel;

using System.Reflection;

private void button1_Click(object sender, EventArgs e)
{
try
{
string temp;
int iColumnas = 0;
leo.Application xlsApp = new leo.Application();
//xlsApp.DisplayAlerts = false;
leo.Worksheet xlsSheet;
leo.Workbook xlsBook;
xlsApp.Visible = false;

xlsBook = xlsApp.Workbooks.Add(true);
xlsSheet = (leo.Worksheet)xlsBook.ActiveSheet;

for (int iCol = 0; iCol < dtvendedor.Columns.Count; iCol++)
{
if (dtvendedor.Columns[iCol].Visible == true)
{

xlsSheet.Cells[1, iCol + 1] = dtvendedor.Columns[iCol].HeaderText;
iColumnas++;
}

}

for (int iRow = 0; iRow < dtvendedor.Rows.Count - 1; iRow++)
{
for (int iCol = 0; iCol < dtvendedor.Columns.Count; iCol++)
{
if (dtvendedor.Columns[iCol].Visible == true)
{
temp = dtvendedor[iCol, iRow].Value.ToString();
xlsSheet.Cells[iRow + 2, iCol + 1] = temp;
}
}
}

//Definir el rango y aplicarle un formato.
leo.Range rango = xlsSheet.get_Range(xlsSheet.Cells[1, 1], xlsSheet.Cells[dtvendedor.Rows.Count + 1, iColumnas]);
rango.Cells.AutoFormat(leo.XlRangeAutoFormat.xlRangeAutoFormatList2,
Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value);

xlsSheet.Columns.AutoFit(); //Ajusta ancho de todas las columnas
xlsApp.Visible = true;
xlsApp.Quit();
}
catch (Exception error)
{
MessageBox.Show(error.Message);
}
}

21/01/10 11:28:22

WILDER CHICANA escribió:

WOW!!! EXCELENTE! EN TODA LA RED NO PUDE ENCONTRAR UN EJEMP ASI! TE FELICITO Y SIGUE POSTEANDO MAS CODIGO COMO ESTOS!

13/02/10 16:12:33

Novedades en desarrollo de aplicaciones para la plataforma Microsoft .Net. Novedades con Windows Vista para desrrolladores.