使用ActiveDocument时记录替换量

Question

我需要在状态栏中显示此单词宏所做的替换量。我不知道如何将替换作为整数。

With ActiveDocument.Range.Find
    .ClearFormatting
    .Replacement.ClearFormatting
    .Text = xSelection
    .Replacement.Text = myValue
    .Forward = True
    .Wrap = wdFindContinue
    .Format = False
    .MatchWildcards = True
    .Execute Replace:=wdReplaceAll
End With

Answer 1

使用查找wbReplaceAll 不返回替换计数。 你必须自己计算。您可以see there

之一的方法