小编Fan*_*Ban的帖子

我习惯使用Selection.WholeStory,但现在有一个宏,我在那里做了很多搜索和替换操作.我只希望模块在运行宏之前在用户选择的选择中进行搜索和替换.

我怎样才能做到这一点？我已经尝试过Selection.Text,但Word告诉我这是Text属性的无效使用.

补充: 我的模块就是这样开始的

Sub Bibliography()

With ActiveDocument
        .TrackRevisions = False
        .PrintRevisions = False
        .ShowRevisions = False
End With
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting

通过不指定选择对象,我应该只获得用户在运行宏之前已经做出的选择.但这似乎不起作用.例如,下面的代码改变了整个文档中的出现次数,而不仅仅是用户做出的选择

With Selection.Find
    .Text = "%"
    .Replacement.Text = " %"
    .Forward = True
    .Wrap = wdFindContinue
    .Format = False
    .MatchCase = False
    .MatchWholeWord = False
    .MatchWildcards = False
    .MatchSoundsLike = False
    .MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll