VB宏使用GREP表達式在Word文檔中搜索

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

看起來像Word可自2007年開始做正則表達式： Find and replace text by using regular expressions (Advanced)