我之前已经意识到这个问题，但提供的答案并没有解决问题。我在Excel中运行VBA代码，执行以下操作：
1。）打开本地工作表（即C：\ desktop \ AOR \ Names.xlsx）
2。）读取B列，获取需要验证的文件名称
3.。）从网络驱动器打开文件名（从B列开始）。
4.。）从打开的文件中验证一些单元格
5.）关闭文件。
6。）迭代。
这一切都没有问题;我的情况是，当从网络驱动器打开文件时（即步骤3），我得到“下载文件”消息。唯一的选择是“取消”或让它完成。按取消（或使用SendKeys执行此操作）会导致文件打开取消，从而停止其余的过程。我有用户不小心按下这个取消足够多次，我想完全取消对话框，但找不到任何有用的东西。
以下是一些代码，其中包含我尝试过的所有选项都无济于事：
WhatName = Workbooks(AgencyNamesList).Worksheets("Agencies").Range("B" & i).Value ' get name of file from locally opened workbook.
Application.ScreenUpdating = False
Application.EnableEvents = False
Application.DisplayAlerts = False
Application.EnableEvents = False ' Prevent code in workbook from running
' Application.SendKeys "{ESCAPE}", False ' Cancels subsequent file opens
' Application.SendKeys "{ESCAPE}", True ' Cancels the file open
' Application.SendKeys "~", True ' Cancels the file open
QuarterDueDate = Workbooks.Open(SourceFolder & WhatName).Worksheets("YTD").Range("I6").Value ' open book get value of I6
此page显示对话框的图片以及其他人试图找到解决此问题的解决方案（自2012年起）。
OPSYS：Windows 7 Enterprise SP1
EXCEL：MS Office Professional Plus 2013
我确信希望有人找到一种方法来防止这个弹出框弹出！
注意：对于本地存储的相同文件运行此代码时，不会显示该对话框。
谢谢！