Ending Excel processes in VBA

[gorgon777]

Hi again,

I have the following code to stop Excel processes running

Sub Kill_Excel()

Dim sKillExcel As String

sKillExcel = "TASKKILL /F /IM Excel.exe"
Shell sKillExcel, vbHide

End Sub

But this also closes the main workbook. Is there a way to stop that from happening, as I only want to close those processes left trailing from the CreateObject method I use in my code.

 

[Andrew Fergus]

Rather than kill the entire Excel process, would it not be better to set the old instances of objects to nothing?

e.g.
Set MyObj = Nothing

change MyObj to the object you are trying to close.

Andrew

 

[abeldavis]

The topic offers useful solution to end Excel processing in VBA.

Following demo code is I copied from that thread for Excel processing issue.

Option Explicit  Private Sub Application_Startup() Dim xlApp As Excel.Application Dim myWB As Excel.Workbook Dim myDate As Date Dim myPrompt As Variant      myDate = Date      Set xlApp = CreateObject("Excel.Application")      xlApp.Visible = False      Set myWB = xlApp.Workbooks.Open("C:\Users\JThomps2\Desktop\ClosingDays.xls")      myPrompt = xlApp.VLookup(CDbl(myDate), myWB.Worksheets("Sheet1").Range("A:B"), 2, False)         If Not IsError(myPrompt) Then         MsgBox ("Closing Day " & myPrompt)     End If          myWB.Close False        Set myWB = Nothing      xlApp.Quit      Set xlApp = Nothing  End Sub

http://www.mrexcel.com/forum/excel-questions/735062-excel-process-not-closing.html

 

[gorgon777]

Andrew's solution worked great The reason I kept having trailing processes was because I forgot to do it to every workbook I opened.