我想录制一个宏,以便它将当前光标位置后的所有“换行符号”替换为空格。
例如,如果文本是:
我的名字是Sumit。我
爱
Stackoverflow
现在如果光标就在'love'旁边,我按下宏按钮就应该是这样的:
我叫Sumit。我
喜欢Stackoverflow
我搜索了互联网并写了这个(但这不起作用)
Sub Replace()
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "^p"
.Replacement.Text = " "
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = True
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub
答案 0 :(得分:1)
我猜你想要改变
.Wrap = wdFindContinue
到
.Wrap = wdFindStop
和
.MatchWildcards = True
到
.MatchWildcards = False
第一个更改应该阻止搜索返回并在光标之前替换内容,第二个更改将关闭通配符(^ p不是通配符)。
但如果这些变化不充分,那么确切地知道它是如何工作的可能会有所帮助。