Excel导入文件时创build其他VBA项目

我目前正在从一个网站抓取一个csv文件的项目，并将其放入我的工作簿中的预定义页面。 它在某种程度上起作用，但它不断创build新的VBA项目，我并不真正理解，最终停止工作。 请注意，对于特定的网站，我从中提取这个我不能使用Internet Explorer。

我正在使用的代码：

Private Sub CommandButton3_Click() On Error Resume Next Kill "C:\Users\Me\Downloads\products.csv" On Error GoTo 0 Shell ("C:\Program Files (x86)\Google\Chrome\Application\chrome.exe -url url-string-here") Application.Wait (Now + TimeValue("00:00:25")) sCSVLink = "C:\Users\Me\Downloads\file.csv" sfile = "file.csv" ssheet = "CurrentListings" Set wnd = ActiveWindow Application.ScreenUpdating = False Sheets(ssheet).Cells.ClearContents Workbooks.Open Filename:=sCSVLink Windows(sfile).Activate ActiveSheet.Cells.Copy wnd.Activate Sheets("CurrentListings").Paste Application.DisplayAlerts = False Windows(sfile).Close False Application.DisplayAlerts = True Application.ScreenUpdating = True Sheets("CurrentListings").Range("E:E").WrapText = False End Sub 

就像我说的，它会工作几次，但每次都会发生这种情况：

最终它给我一个运行时错误，有什么build议吗？

Answer 1

VBE中的鬼项目通常是由于全局variables持有对工作簿的引用。 如果你确定它不是你自己的代码，它包含variables引用，它可能是一个COM加载项。

尝试在Excel中禁用所有的COM加载项（开发人员选项卡，COM加载项button），然后运行您的代码。 然后添加COM加载项，直到您复制该问题。

根据我的经验，MS Power Query Add-in导致了这个问题。