将来自不同excel工作簿的数据收集到一个工作簿中

时间:2013-08-08 18:13:37

标签: excel vba error-handling dialog

我有一个主要工作簿,里面有一些代码。该代码打开了数百个(最终可能有数千个)excel工作簿。它从每个外部工作簿中提取数据,并将该信息保存到主工作簿中的各种电子表格中。

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

我尝试过Application.DisplayAlerts = false 它没有帮助。处理完几百个文件后,仍然可以在模型对话框中获得有用的信息。

无法找到Application.OverrideEveryStupidDefaultMSEverThoughtOf属性。

有没有办法解决或避免这个问题?

2 个答案:

答案 0 :(得分:3)

我知道即使DisplayAlerts设置为False,也会显示相当多的消息。在阅读了你的问题并对此感到好奇后,我做了一个快速的研究,发现各种属性避免了不同类型的消息。是的,你的也拥有自己的财产(MSDN):

Application.AskToUpdateLinks = False

答案 1 :(得分: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