CLR: .Net / Mono / Boo / Otros CLR > VB .NET
Problemas con el DataGrid de mi Programa, por favor ayudenme
Crossward:
muchas gracias muchachos, por la ayuda.... miren la verdad es que aun no he podido exportar nada a excel ni crear un reporte con el crystal report, Uso Visual Studio 2005.... por el momento me mantuve feliz con imprimir el formulario en pantalla, con el comando PrintForm.Print(printForm As Form, printFormOption As PrintOption).... y bueno asi me funciona una forma de imprimir el grid, pero solo lo que se ve de el...
Ya encontrare una manera de exportar los datos del grid... le he preguntado a mi profesor pero nunca tiene tiempo así que las veré con ustedes o ya caerá alguna solución.
Muchas gracias de nuevo, estaré atento al foro como siempre.
Saludos.
Jeysscarr:
Hola...
en este tutorial se muestra como se crea un raporte de una manera muy sencilla, en este caso se usan clases
http://jeycarrero.blogspot.com/2010/05/crear-reportes-en-c-sin-bases-de-datos.html
Siguiendo el tutorial anterior he creado un programa que JALA unos datos de una base de datos de accesss y que crea un reporte con los datos del DataGrid, es muy sencillo, Abajo te dejo el programa, solo tienes que agregar el reporte una tabla y enlazar los bindings
No si se halla problema con que sea visual 2008...
gerloxxx:
Hola te paso unas instrucciones de como puedes trabajar con Excel, despues de crear el objeto puedes escribir en las celdas, dibujar los bordes, insertar imagenes, ponerles color, etc...:
--- Código: vb.net --- With oExcel .Cells.Select() 'Asi seleccionas todas las celdas o asi solo un rango oExcel..Range("B1:M2").Select() With .Selection.Font 'Puedes cambiar la fuente del rango seleccionado anteriormente .Name = "Verdana" .Size = 8 End With .ActiveCell.FormulaR1C1 = "Escribes en la celda seleccionada anteriormente " .Selection.MergeCells = True 'Combinar celdas...
te dejo una funcion que hice a manera de ejemplo, es muy sencilla y espero que te ayude a trabajar con una hoja de Excel, le pasas el datagridview y lo manda a excel sin preguntar más nada:
--- Código: vb.net --- Public Function ObtColExcel(ByVal intValor As Integer) As String If intValor < 1 Then Throw New Exception("El valor mínimo para la columna debe ser 1") Dim intDiv, intMod As Integer If intValor <= 26 Then Return Chr(64 + intValor) intDiv = (intValor - 1) 26 'numero de letras intMod = intValor Mod 26 intMod = IIf(intMod = 0, 26, intMod) Return Chr(64 + intDiv) & Chr(64 + intMod) End Function Friend Sub ExpExc(ByRef dg As DataGridView) Dim oExcel As Object Dim oHoja As Object Dim strColumna As String Try If dg.RowCount = 0 Then Exit Sub 'Se crea el documento de Excel oExcel = CreateObject("Excel.Application") oHoja = oExcel.Workbooks.Add oExcel.Visible = True Dim r As Integer = 0 Dim c As Integer = 0 For c = 0 To dg.ColumnCount - 1 For r = 0 To dg.RowCount - 2 strColumna = ObtColExcel(c + 1) oExcel.Range(strColumna & r + 1).FormulaR1C1 = dg.Rows(r).Cells(c).Value.ToString() Next Next Catch ex As Exception MsgBox(ex.Message) Finally oHoja = Nothing oExcel = Nothing GC.Collect() End Try End Sub
***Adjunto te dejo una clase un poco más elaborada que encontre hace tiempo en la red, te crea unas dll's capaces de exportar a Excel u Open Office, está en C# pero la verdad vale la pena que les des una revisada... Espero no confundirte con esto, pero cualquier duda no dudes en preguntar....
saludos
Navegación
[*] Página Anterior
Ir a la versión completa