保存并关闭特定 Excel

Question

我已经创建了用于关闭和保存 Excel 文件的 VBScript 命令，但它不适用于特定的 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

Select 您想要 save/close 而不是当前活动的特定工作簿：

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

保存并关闭特定 Excel

Save and Close specific Excel

vbscript