Question

我在Word中有一个宏。此宏打开文档，更改语言以进行拼写，保存并关闭它。

问题是当我重新打开文档时，语言已更改，但拼写错误未显示。

我尝试了一些东西，我得出的结论是“bug”在ActiveDocument.Save行中。如果我不保存文档，则显示错误，但我需要以编程方式保存并关闭所有文档，因为此子例程是另一个管理大量文档并保持打开所有文档或提示对话框的一部分要求保存文档不是解决方案。

代码

Sub MacroFoo()

     Documents.Open FileName:= _
        "C:\MyDir\foo.doc", _
        ConfirmConversions:=True, ReadOnly:=False, AddToRecentFiles:=False, _
        PasswordDocument:="", PasswordTemplate:="", Revert:=False, _
        WritePasswordDocument:="", WritePasswordTemplate:="", Format:= _
        wdOpenFormatAuto, XMLTransform:=""
    ActiveDocument.Content.LanguageID = wdFrench
    ActiveDocument.Content.NoProofing = False
    ActiveDocument.Save
    ActiveWindow.Close

End Sub

Answer 1

经过对Word对象参考的深入研究后，我找到了解决方案。

使用这行代码，我们强制计算错误：

ActiveDocument.SpellingErrors.Count

保存并关闭文档后，如果我们重新打开它，我们可以检查错误是否显示。

谢谢大家。：）

更改语言后显示拼写错误

代码

1 个答案: