Hi Paul,
Sorry, I missed to mention this.
The macro halts at, and so I had to make it as a comment block.
With Content.Find
' .ClearFormatting
' .Replacement.ClearFormatting
' 'Convert non-breaking hyphens to ordinary hyphens
' .Text = "^~"
' .Replacement.Text = "-"
' .Execute Replace:=wdReplaceAll
' 'Delete manual page breaks
' .Text = "^m"
' .Replacement.Text = ""
' .Execute Replace:=wdReplaceAll
' End With
Thanks
FLDS
|