保存并关闭特定的Excel

Question

我已经创建了VBScript命令来关闭和保存Excel文件，但是它不适用于特定的Excel文件名（只能关闭并保存ActiveWorkbook）。

情况：同时打开2个Excel文件，分别是“ DM.xlsx”和“ Others.xlsx”。我需要的太近了，只保存“ DM.xlsx”。

这是我当前的命令：

Option Explicit
Dim objXL
On Error Resume Next
Set objXl = GetObject(, "Excel.Application")
On Error Goto 0
On Error Resume Next
objXL.ActiveWorkbook.Save
On Error Goto 0
objXL.Quit
On Error Goto 0

是否可以通过文件名激活工作簿？

Answer 1

选择要保存/关闭的特定工作簿，而不是当前处于活动状态的工作簿：

objXL.Workbooks("DM.xlsx").Save
objXL.Workbooks("DM.xlsx").Close