VB宏使用GREP表达式在Word Doc中搜索

Question

由于Word没有基于正则表达式进行搜索的机制，我试图编写一个简单的宏，在这种情况下，在我当前活动的文档中搜索一段时间（.）没有跟随它的空间。这是我的第一个传递：

Sub TestREG()
'
' TestREG Macro
'
'
Set objRegExp1 = CreateObject("vbscript.regexp")
objRegExp1.Global = True
objRegExp1.IgnoreCase = True
objRegExp1.Pattern = "\.[A-Z]"
MyDOC = ActiveDocument
objRegExp1.Execute (MyDOC)
End Sub

我知道我在这里错过了很多，但是在一个开放的Word文档中试图记住如何做到这一点。我尝试的每个测试，当我逐步执行此操作时返回False。

有人可以建议我怎么做吗？

Answer 1

看起来自2007年以来Word可以执行正则表达式： Find and replace text by using regular expressions (Advanced)