vb.net - 替换而不通过 VB.net 在 Word 中进行下一个查找

Question

有谁知道是否可以通过 VB.Net 在 Word 中执行替换功能而无需自动移动到下一个“命中”？看起来替换功能实际上是替换/查找。

我现在正在考虑进行搜索，放置书签，执行替换，然后将焦点移回书签。这本身并不难，但似乎效率不高。

目前还没有代码，因为我仍在调查可能性。

Answer 1

也许这对你有一些用处：

http://social.msdn.microsoft.com/Forums/en-US/1558f560-8ae6-413a-bbc4-aa8d5d912aac/find-replace-in-a-word-document-by-vbnet

'credit to martin xie
Dim objDoc As Word.Document = objWordApp.Documents.Open("C:\Trydata\1.doc")   
    objDoc = objWordApp.ActiveDocument   

    'Find and replace some text   
    'Replace 'VB' with 'Visual Basic'   
    objDoc.Content.Find.Execute(FindText:="VB", ReplaceWith:="Visual Basic Express", Replace:=Word.WdReplace.wdReplaceAll)   
    While objDoc.Content.Find.Execute(FindText:="  ", Wrap:=Word.WdFindWrap.wdFindContinue)   
        objDoc.Content.Find.Execute(FindText:="  ", ReplaceWith:=" ", Replace:=Word.WdReplace.wdReplaceAll, Wrap:=Word.WdFindWrap.wdFindContinue)   
    End While  

否则，不确定您的意图是什么。为什么要查找/替换然后移回书签？你的目标是什么，你为什么要这样做？