Excel don't close in background

Question

I am opening Excel from MsAccess and when I finished the task I close it, but Excel remain opened in backgroud until I close MsAccess

this is the code

Public Sub closeExcel()
    Dim xlApp
    Dim wkb     As Object
    Dim wks     As Object
    
    On Error Resume Next
    Set xlApp = GetObject(, "Excel.Application")

    If err <> 0 Then
        Set xlApp = CreateObject("Excel.Application")
    End If

    With xlApp
        Set wkb = .Workbooks.Add
        Set wks = wkb.Worksheets(1)

        wkb.Close True
        Set wks = Nothing
        Set wkb = Nothing
        .Quit

    End With
End Sub

I need to remain Access runing, but I want that Excel be closed. How can I do this?

score 0 · Answer 1 · answered Dec 14 '20 at 11:57

0

You are cutting off the worksheet. Try this:

With xlApp
    Set wkb = .Workbooks.Add
    Set wks = wkb.Worksheets(1)
    ' Do stuff.
    Set wks = Nothing
    wkb.Close True
    Set wkb = Nothing
    .Quit
End With

Set xlApp = Nothing

answered Dec 14 '20 at 11:57

Gustav

53,498
7
29
55

Then skip the `With .. End With` syntax. – Gustav Dec 15 '20 at 07:56
Sorry, no change – danilazare Dec 15 '20 at 08:57
Then you run something that blocks it. Like [here](https://stackoverflow.com/a/52042660/3527297). – Gustav Dec 15 '20 at 09:32

Excel don't close in background

1 Answers1