Question

我想让VBA脚本在选择中执行查找/替换，然后将宏指定给快速访问工具栏上的按钮，以节省必须单击通常的查找/替换过程。

我在执行此操作时录制了一个宏，这就是我得到的：

 Sub FindReplace()
      '
      ' FindReplace Macro
      '
      '
     Selection.Find.ClearFormatting
     Selection.Find.Replacement.ClearFormatting
     With Selection.Find
         .Text = "^p"
         .Replacement.Text = " "
         .Forward = True
         .Wrap = wdFindAsk
         .Format = False
         .MatchCase = False
         .MatchWholeWord = False
         .MatchWildcards = False
         .MatchSoundsLike = False
         .MatchAllWordForms = False
     End With
     Selection.Find.Execute Replace:=wdReplaceAll
 End Sub

但是当我在选择上运行此宏以将段落标记更改为空格时，它会继续更改整个文档，而不仅仅是选择。

我对VBA并不陌生，但我看不清楚如何修复它，以便在选择完成后停止。

Answer 1

您将需要使用

     .Wrap = wdFindStop

而不是

     .Wrap = wdFindAsk

MS Word中的VBA会影响整个文档，而不仅仅是选择

1 个答案: