embedded式Excel文件崩溃

我需要把一个链接到我当前的工作簿中的另一个Excel文件。 这是我的VBA代码,这样做的一部分:

v_fileNameToImport = ThisWorkbook.Path & "\" & v_techs(i) & "\" & v_regions(j) & "\Results\" & v_files(k) v_sheetName = "RESUMO " & v_regions(j) 'Check if there is already a tab for this region If (SheetExists(v_sheetName)) Then Worksheets(v_sheetName).OLEObjects.Add Filename:=v_fileNameToImport, Link:=True, DisplayAsIcon:=True, Top:=40, Left:=160, Width:=100, Height:=100 Else Set v_sheet = ThisWorkbook.Sheets.Add v_sheet.Name = v_sheetName v_sheet.OLEObjects.Add Filename:=v_fileNameToImport, Link:=True, DisplayAsIcon:=True, Top:=40, Left:=40, Width:=100, Height:=100 End If 

运行macros后,每个文件链接显示为空白矩形而不是Excel图标。 当我点击它,它开始打开另一个文件,但崩溃了。

编辑:看来,当我第二次运行macros,即已经导入文件后,它会崩溃,despites所有选项卡被删除macros启动时。 也许文件的引用仍然是despites它的选项卡被删除,是什么原因导致与同一个文件的新引用冲突。 从新文件运行时,这个问题不会发生。