Excel Prozess wird nicht im Taskmanager beendet

  • VB.NET

    Excel Prozess wird nicht im Taskmanager beendet

    Hallo,
    ich habe ein Problem bei einem Export von Visual Studio nach Excel.
    Sobald ich mehr als 3 Zellen nach Excel exportiere (ab Zeile 17 bleibt beim Beenden
    der Excel Prozess im Taskmanager hängen. Er geht zwar schon weg
    wenn ich die Form schließe. Aber das stört mich ein wenig.
    Hab auch schon einen Timer eingebunden, hat aber nix geholfen.
    Vielleicht kann mir jemand helfen.

    Was mach ich falsch???

    Gruß Michael



    VB.NET-Quellcode

    1. Sub excel_export()
    2. Dim XLSApp As New Excel.Application
    3. Dim XLSWS As New Excel.Worksheet
    4. Dim path As String = "D:\Kalkulationsblatt.xlsx"
    6. XLSApp.Workbooks.Open(path) : path = Nothing
    7. XLSApp.Visible = True
    9. 'Daten nach Excel schreiben
    10. XLSWS = XLSApp.Sheets(1)
    11. With XLSWS
    12. .Select()
    13. .Visible = True
    14. .Cells(4, 3).value = FRM_VA_KALK.TXT_Kopf_Kunde.Text.ToString
    15. .Cells(6, 3).value = FRM_VA_KALK.TXT_Kopf_Ansprechpartner.Text.ToString
    16. .Cells(8, 3).value = FRM_VA_KALK.TXT_Kopf_Adresse.Text.ToString
    17. .
    18. .
    19. .
    20. End With
    21. XLSWS = Nothing
    24. 'Excel Speichern und beenden
    25. With XLSApp
    26. .ActiveWorkbook.Save()
    27. .DisplayAlerts = False
    28. .Quit()
    29. End With
    31. 'Prozess beenden
    32. System.Runtime.InteropServices.Marshal.ReleaseComObject(XLSWS)
    33. XLSWS = Nothing
    35. System.Runtime.InteropServices.Marshal.ReleaseComObject(XLSApp)
    36. XLSApp = Nothing
    38. GC.Collect()
    39. GC.WaitForPendingFinalizers()
    40. End Sub

Facebook
Telefonspende