将不同 Excel 工作簿中的数据收集到单个工作簿中答案

【问题标题】：Collecting data from disparate excel workbooks into a single workbook将不同 Excel 工作簿中的数据收集到单个工作簿中
【发布时间】：2013-08-10 14:00:03
【问题描述】：

我有一个包含一些代码的主工作簿。该代码会打开数百个（最终可能是数千个）excel 工作簿。它从每个外部工作簿中提取数据，并将该信息保存到主工作簿中的各种电子表格中。

该程序有效 - 并且已经有效。但是 - 我不确定这是由于代码更改还是更多数据 - 在处理 100 多个文件后，该程序会为每个连续文件生成一个模式对话框，显示“此工作簿包含指向其他文件的链接”数据源”并坚持我点击“更新”、“不更新”或“帮助”。我现在必须通过这条有用的消息点击“不要更新”100 次。

我已经尝试过 Application.DisplayAlerts=false 它没有帮助。处理数百个文件后，仍然会在模型对话框中获得有用的消息。

找不到 Application.OverrideEveryStupidDefaultMSEverThoughtOf 属性。

有没有办法解决或规避这个问题？

【问题讨论】：

【解决方案1】：

我知道即使DisplayAlerts 设置为False，也会出现很多消息。在阅读了您的问题并对此感到好奇后，我进行了快速研究，发现各种属性可以避免不同类型的消息。是的，你的也有自己的财产（MSDN）：

Application.AskToUpdateLinks = False

【讨论】：

【解决方案2】：

您的简单问题看起来很复杂，因为您没有显示您使用的任何代码。如果有任何代码，我认为几乎一半的支持者会在您的问题出现 5 分钟后帮助您。

但是，我只能猜测在您的代码中某处有这条小指令：

Workbooks.Open ...

如果是这样，这个.Open method 有一个特殊的参数可以解决你的问题。 Here is MSDN link 有一些解释。您应该使用第二个参数UpdateLinks，您应该通过这种方式将其设置为True 或False：

Workbooks.Open filePath+fileName, True ' to update links
Workbooks.Open filePath+fileName, False ' to not update links

【讨论】：