Datagridview in Excel exportieren

  • VB.NET

Es gibt 6 Antworten in diesem Thema. Der letzte Beitrag () ist von schnibli.

    Datagridview in Excel exportieren

    Hallo,

    Ich exportiere mein Datagridview momentan so:

    VB.NET-Quellcode

    1. Dim xls_Appl As Excel.Application ' Excel Anwendung
    2. Dim xls_Mappe As Excel.Workbook ' Excel Arbeitsmappe
    3. Dim xls_Blatt As Excel.Worksheet ' Excel Blatt (Tabelle)
    4. Dim Anzahlzeilen As Integer
    5. xls_Appl = New Excel.Application() ' Excel Instanz bilden xls_Appl.Visible = True
    6. xls_Mappe = xls_Appl.Workbooks.Add()
    7. xls_Blatt = xls_Mappe.ActiveSheet
    8. 'hier muß der Name des zu exportierenden DataGridViews rein
    9. With ArtikeldatenbankDataGridView
    10. For Spalte As Integer = 0 To .Columns.Count - 1
    11. xls_Blatt.Cells(1, Spalte + 1).Value = .Columns(Spalte).HeaderText
    12. xls_Blatt.Cells(1, Spalte + 1).Font.Bold = True
    13. Next
    14. Anzahlzeilen = .Rows.Count
    15. If .AllowUserToAddRows = True Then
    16. Anzahlzeilen = Anzahlzeilen - 1 ' Leerzeile abziehen
    17. End If
    18. If "bestellen" > 0 Then
    19. For Zeile As Integer = 0 To Anzahlzeilen - 1
    20. For Spalte As Integer = 0 To .Columns.Count - 1
    21. xls_Blatt.Cells(Zeile + 2, Spalte + 1).Value() _
    22. = .Rows(Zeile).Cells(Spalte).Value()
    23. Next
    24. Next
    25. End If
    26. End With
    27. End Sub



    Bei dieser Variante muss ich manuell den Speicher Ort und Name angeben.

    Ich hätte lieber, wenn das Excelfile mit einem vorgegebenem Name in einem Vorgegeben Ordner gespeichert wird.
    (Das Excelfile muss nicht zwingend geöffnet werden)

    gruss

Facebook
Telefonspende