Workbooks.Open不适用于第二个工作簿

时间:2017-04-28 09:03:29

标签: excel vba excel-vba hssfworkbook

我试图提示用户打开第二个excel工作簿,在第一个工作簿中执行“vlookup”。但是在这段代码之后宏被卡住了:

JSON

没有弹出错误消息,它只是卡在那里,即使我按“ctrl + Break”来停止它。

但是,当我尝试将此代码分成两个(在提示打开第二个工作簿之前)时,它工作正常。这段代码出了什么问题?

以下是完整的代码:

s2FileName = Application.GetOpenFilename("Excel Files (*.xls;*.xlsx;*.xlsm;*.xla;*.xlam),*.xls;*.xlsx;*.xlsm;*.xla;*.xlam, All Files (*.*), *.*", 1, "Select second file")
If s2FileName = "False" Then Exit Sub

Application.DisplayAlerts = False
Set f2 = Workbooks.Open(s2FileName, UpdateLinks:=xlUpdateLinksNever)

0 个答案:

没有答案