Macro to del paragraph marks (Wprd97, SR2)

[curious]

Morning,

Having problem troubleshooting this simple macro: I

[HansV]

There are several problems with your macro.

Here is an improved version:

With Selection.Find
.Text = "^p"
.Replacement.Text = " "
.Forward = True
.Wrap = wdFindStop
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
.Execute Replace:=wdReplaceAll
End With
Selection.MoveLeft Unit:=wdSentence

Remarks:
<UL><LI>This is not a wildcard search, so I have set the find text to "^p" and MatchWildcards to False
<LI>I have put the Execute within the With ... End With block
<LI>.MoveLeft is invalid outside a With ... End With block
<LI>wdParagraph is not valid for MoveLeft, it is intended for MoveUp or MoveDown
<LI>Since you want the cursor to be an IP, you should not use wdExtend.[/list]

[curious]

Perfect! Many, many thanks, HansV