Foros del Web » Programación para mayores de 30 ;) » .NET »

Exportar DataGrid a Excel, Visual Basic 2003

Estas en el tema de Exportar DataGrid a Excel, Visual Basic 2003 en el foro de .NET en Foros del Web. Hola amigos. Tengo un código que me sirve para Visual Basic 2005 pero no con Visual Basic 2003. Necesito exportar un DataGrid de Visual Basic ...
  #1 (permalink)  
Antiguo 02/09/2011, 19:45
Avatar de moradazo  
Fecha de Ingreso: julio-2008
Ubicación: [email protected]
Mensajes: 355
Antigüedad: 15 años, 9 meses
Puntos: 2
Exportar DataGrid a Excel, Visual Basic 2003

Hola amigos.

Tengo un código que me sirve para Visual Basic 2005 pero no con Visual Basic 2003.

Necesito exportar un DataGrid de Visual Basic 2003 a Excel, pero no se precisamente cual sería el código correcto. Tengo este código de VB 2005:

Código vb:
Ver original
  1. Dim xlApp As Excel.Application
  2.         Dim xlWorkBook As Excel.Workbook
  3.         Dim xlWorkSheet As Excel.Worksheet
  4.         Dim misValue As Object = System.Reflection.Missing.Value
  5.  
  6.         Dim i As Int16, j As Int16
  7.  
  8.         xlApp = New Excel.ApplicationClass
  9.         xlWorkBook = xlApp.Workbooks.Add(misValue)
  10.         xlWorkSheet = xlWorkBook.Sheets("Hoja1")
  11.  
  12.         For C As Integer = 0 To DataGridView1.Columns.Count - 1
  13.             xlWorkSheet.Cells(1, C + 1).value = DataGridView1.Columns(C).HeaderText
  14.         Next
  15.         For i = 0 To DataGridView1.RowCount - 1
  16.             For j = 0 To DataGridView1.ColumnCount - 1
  17.                 xlWorkSheet.Cells(i + 2, j + 1).value = DataGridView1.Item(j, i).Value
  18.             Next
  19.         Next
  20.         xlWorkBook.SaveAs("C:\prueba.xls", Excel.XlFileFormat.xlWorkbookNormal, misValue, misValue, misValue, misValue, _
  21.          Excel.XlSaveAsAccessMode.xlExclusive, misValue, misValue, misValue, misValue, misValue)
  22.         xlWorkBook.Close(True, misValue, misValue)
  23.         xlApp.Quit()


Quería ver si me pueden ayudar a transformarlo para Visual Basic 2003, que me deje guardar, es que me da error en DataGridView1.Columns.Count, en DataGridView1.RowCount



Gracias!!!

Etiquetas: 2003, basic, datagrid, datagridview, excel, vb, visual
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 11:21.