VB.NET ¡Cómo exportar el contenido de DataGridview a EXCEL!
Dim xlApp, xlBook, xlSheet As Object
> xlapp = CreateObject.Worksheet(1)
'Atenuar xlapp como nueva aplicación Excel
'Atenuar xlbook como Excel.Workbook
'Atenuar xlsheet como Excel .Workheet
'Dim xlSheet As Excel.Workheet
colindex = colindex 1
xlapp.Cells(1, colindex) = col.ColumnName Next p >
'Escribe cada fila de la tabla en EXCEL
Para cada fila en table.Rows
rowindex = rowindex 1
colindex = 0 p>
Para cada columna en table.Column
Colindex = 0
Col.ColumnNameColumns
colindex = colindex 1
xlapp.Cells(rowindex, Colindex) = fila(col.ColumnName)
Siguiente paso
Siguiente paso
xlapp.Visible = True
El requisito previo para End Sub es hacer referencia al archivo Microsoft.Office.Interop.Excel.dll y luego mostrar el archivo en la parte superior de la tabla. dll y escriba Imports Microsoft.Office.Interop.Excel.
en la parte superior