仅关闭由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 

如果您要同时打开多个工作簿并希望稍后关闭它们，则需要对所有工作簿进行标记，例如通过将句柄存储在字典或数组中。