编辑和包装搜索结果在括号中

Question

我想找到字符串“否”的所有发生。 + 1-2整数在1到9之间。然后删除“否”。并将整数包裹在衍生物之间：“（4）”或“（67）”。例如“第34号”应该变成“（34）”。

我似乎有多个问题（Word 2010）：

1. 代码仅替换一个整数。我如何找到一个或两个整数？
2. 我如何使.replacement.text包含数字，而不包含“否”一词。 （我只是把xxxxx放在这么远的地方）。

3. 我的代码确实添加了paranthesis，但是在活动文档的开始和结尾处。如何使其包装数字？

   With Selection.Find  
       .Text = "n[or]. [1-9]"  
       .Replacement.Text = "XXXXX"  
       .Forward = True  
       .Wrap = wdFindContinue  
       .Format = False  
       .MatchCase = False  
       .MatchWholeWord = False  
       .MatchWildcards = True  
       .MatchSoundsLike = False
       .MatchAllWordForms = False  
   End With  
   Selection.InsertBefore ("(")  
   Selection.InsertAfter (")")  
   Selection.Find.Execute Replace:=wdReplaceAll 
   

Answer 1

尝试以下解决方案：

With Selection.Find
    .Text = "(No.)( )([1-9]{1;2})"
    .Replacement.Text = "(\3)"
    .Forward = True
    .Wrap = wdFindContinue
    .Format = False
    .MatchCase = False
    .MatchWholeWord = False
    .MatchWildcards = True
    .MatchSoundsLike = False
    .MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll