VBA Application.Workbooks.Open(file_name.xls)打开已打开的工作簿,而不是传递的file_name

时间:2018-11-14 07:25:15

标签: excel vba excel-vba

我正在尝试通过将文件名和路径作为参数传递来使用Application.Workbooks.Open打开工作簿。 如果打开了其他任何excel,它将激活打开的excel,而不是使用给定的文件名

打开excel。

我的代码:

Dim rsWB As Workbook
Dim fname As String

fname = "C:\Users\test\my development\ouput\new_output.xlsx"
Set rsWB = Application.Workbooks.Open(fname)

rsWB.Activate
MsgBox (rsWB.Name)  

情况1.如果未打开其他excel文件。 rsWB.Name = new_output.xlsx

情况2。如果output.xlsx已经打开。 rsWB.Name = output.xlsx

0 个答案:

没有答案