如何用VBA对弹出的对话框进行选择

追梦三分地

            我用VBA打开工作簿时，会弹出对话框“此工作簿包含到其他数据源的链接……   更新（U） 不更新（N） 帮助（H)”，
            这时程序就会停止运行，需要我手动按“U”更新，程序才会继续下去。
            当弹出对话框时，如何让程序自动选择更新（U）？
            恳请高手指教！

zhaogang1960

不让出现该提示
Application.AskToUpdateLinks = False
配合
Workbooks.Open Filename:=文件全名, UpdateLinks:=0

如果想更新链接，则
Workbooks.Open Filename:=文件全名, UpdateLinks:=3'或2
请参阅VBA帮助Open 方法
Open 方法

UpdateLinks      Variant 类型，可选。指定文件中链接的更新方式。如果省略本参数，则提示用户选择链接的更新方式。否则，该参数的取值应为下表中的某个值。

值 含义
0 不更新任何引用。
1 更新外部引用，但不更新远程引用。
2 更新远程引用，但不更新外部引用。
3 同时更新远程引用和外部引用。

追梦三分地

zhaogang1960 发表于 2012-10-8 17:21
不让出现该提示
Application.AskToUpdateLinks = False
配合

哦，果然解决了。一语中的，简明扼要。谢谢！谢谢！

aecn

知识点，做一下笔记

bright陶

谢谢，学习了

bright陶

Application.AskToUpdateLinks = False
配合
Workbooks.Open Filename:=文件全名, UpdateLinks:=0
    如果这句话放到循环中，如何改？即循环拷贝文件夹里的内容时，避免不断出现警告提示