在打开Word文档时禁用“您要合并更改”消息框吗?

时间:2019-03-01 13:22:32

标签: excel vba ms-word

我正在使用excel vba脚本批量处理word文档。

我使用以下命令打开文档:

Set objDoc = Documents.Open(FileName:=sUri, ReadOnly:=True, ConfirmConversions:=False, RecentFiles:=False)

我的问题是,打开某些文档时,MSWord会引发一个消息框,询问用户是否要合并更改。我如何摆脱此消息框,以便我的脚本可以在没有人工监督的情况下运行?

按照@Pᴇʜ建议编辑1 我将代码更新为:

Dim appWD As Word.Application
Dim objDoc As Document

Set appWD = CreateObject("Word.Application")
appWD.DisplayAlerts = False


Set objDoc = appWD.Documents.Open(FileName:=sUri, _
                            ReadOnly:=True, _
                            ConfirmConversions:=False, _
                            AddToRecentFiles:=False)

我还有另一种情况,尽管DisplayAlerts = False,消息框仍显示为“ Show repairs”。我的代码错误还是我可以禁用的另一种选择?

编辑2-OpenNoRepairDialog Documents对象具有OpenNoRepairDialog方法,该方法可防止打开“显示维修”消息框。

我将进行更多测试,以确保使用DisplayAlerts = False解决问题主题。

1 个答案:

答案 0 :(得分:0)

如果您查看Documents.Open method的文档,就会发现有一个OpenAndRepair参数。

如果将其设置为False,则打开和修复对话框应消失。