关闭实例

Question

我从MS Access调用Excel对象，但我无法关闭实例！

有人会认为工作簿已关闭，因为我们不能再看到它们了，但在任务管理器中 - ＆gt;进程我仍然运行EXCEL.EXE * 32 ...

这就是我所拥有的：

Dim xlApp as Excel.Application
Dim wbks as Workbooks


    Set xlApp = GetObject("", "Excel.Application")
    Set wbks = xlApp.Workbooks
    wbks.Open "C:\blp\api\Office Tools\BloombergUI.xla"
    wbks("BloombergUI.xla").RunAutoMacros (xlAutoOpen)

    wbks.Add
    xlApp.Visible = True

...执行行动......

xlApp.Workbooks(1).SaveAs FileName:=strFullPath, FileFormat:=xlCSV

    xlApp.Application.DisplayAlerts = False
    xlApp.Workbooks("BbgDivData.csv").Close SaveChanges:=True
    wbks("BloombergUI.xla").Close

    xlApp.Quit
    Set xlApp = Nothing

知道为什么它仍然存在吗？我怀疑加载项搞砸了！

Answer 1

您从未明确将工作簿的集合设置为空，只需从一个成员调用close即可。我会尝试添加：

Set wbks = Nothing

在Close之后和Quit之前。