请教一个Excel退出的问题

Question

我在程序中调用了excel，打开一个文件然后保存退出，不打开excel窗体。但是在调用.quit函数之后，excel仍然在进程表中存在，请教如何在不打开excel的情况下将它从进程表关掉，多谢多谢。我调用的代码如下：    '建立Excel对象
    Set objExcel = CreateObject("Excel.Application")
    objExcel.Workbooks.Add
    objExcel.Workbooks(1).Sheets.Add
    If bFlag(0) Then
        If Not ExportYearCountyPeopleToExcel(objExcel, objPeopleGrid, strItem, strTitle, strName, bHeader) Then
            ExportYearCountyReportToExcel = False
            Set objExcel = Nothing
            Exit Function
        End If
    End If
    
    If bFlag(1) Then
        If Not ExportYearCountyCroupToExcel(objExcel, objCroupGrid, strItem, strTitle, strName, bHeader) Then
            ExportYearCountyReportToExcel = False
            Set objExcel = Nothing
            Exit Function
        End If
    End If
    If bFlag(2) Then
        If Not ExportYearCountyeExpenseToExcel(objExcel, objExpenseGrid, strItem, strTitle, strName, bHeader) Then
            ExportYearCountyReportToExcel = False
            Set objExcel = Nothing
            Exit Function
        End If
    End If    If bFlag(3) Then
        If Not ExportYearCountyRedressToExcel(objExcel, objRedressGrid, strItem, strTitle, strName, bHeader) Then
            ExportYearCountyReportToExcel = False
            Set objExcel = Nothing
            Exit Function
        End If
    End If
    objExcel.Workbooks(1).SaveAs strFileName
    objExcel.Quit

Answer 1

objExcel.Workbooks(1).SaveAs strFileName
objExcel.Workbooks(1).Close
objExcel.Quit