仅关闭UFT打开的Excel进程

Question

我有一个UFT脚本，在执行时会打开很多Excel工作簿。 （我可以在任务管理器中看到它）。如何仅关闭仅由UFT打开的Excel文件（临时工作簿）而不关闭由我打开的工作簿？

如果可以使用VBScript完成，那会更有帮助。

Answer 1

Function close_workbook_by_name(workbookname)
    Set xl = CreateObject("Excel.Sheet")
    For Each x In xl.Application.Workbooks
        If x.Name = workbookname Then
            x.Close
        End If
    Next
    Set xl = Nothing
End Function

Answer 2

如果你像你说的那样打开工作簿：

Set objWorkbook = objExcel.WorkBooks.Open(strRunOrder, , True)

你应该能够通过在存储工作簿对象的变量上调用Close方法来关闭它们：

objWorkbook.Close

如果您要同时打开多个工作簿并希望稍后关闭它们，则需要密切关注所有这些工作簿，例如：通过将句柄存储在字典或数组中。