运行时错误5692&q；是什么意思？ [英] What does "Runtime error 5692" mean?

问题描述

在某些情况下，range.Find.Execute会引发错误"Runtime Error 5692"，包括有时范围为空，有时使用格式错误的正则表达式执行正则表达式搜索。

此错误意味着什么？有记录错误的地方吗？从我无知的立场来看，这是不可预测的。

推荐答案

我做了一些研究，但是-和您一样-我没有找到任何文档。
It appears此错误有时可能是由于未清除查找/替换文本而导致的。

我用几个不同的输入测试了下面的代码，它运行时没有错误。 注意：代码需要检查工具->引用->Microsoft Word xx.0对象库。

Sub TextReplace()

    Dim oWord As Word.Application
    Dim oDoc As Word.Document
    Dim oFind As Find

    Set oWord = CreateObject("Word.Application")
    oWord.Visible = True
    Set oDoc = oWord.Documents.Add("C:in.doc")
    Set oFind = oDoc.Range.Find

    oFind.Execute "foo", , , , , , , , , "bar", wdReplaceAll

    oDoc.SaveAs ("C:out.doc")
    oDoc.Close
    oWord.Visible = False

End Sub

如果在运行此代码时遇到任何错误，请随时更新您的问题。

这篇关于运行时错误5692&q；是什么意思？的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！