Can anyone, please, supply a macro to be assigned to a toolbar button
to remove
these and to format the text properly for importation into magazine articles
the following Macro will remove unwanted Returns from Text Files.
Sub MAIN
EditReplace .Find = "^p^p", .Replace = "$$$", .Direction = 0, .MatchCase = 0,
.WholeWord = 0, .PatternMatch = 0, .SoundsLike = 0, .ReplaceAll, .Format = 0,
.Wrap = 1
EditReplace .Find = "^p", .Replace = "", .Direction = 0, .MatchCase = 0,
.WholeWord = 0, .PatternMatch = 0, .SoundsLike = 0, .ReplaceAll, .Format = 0,
.Wrap = 1
EditReplace .Find = "$$$", .Replace = "^p^p", .Direction = 0, .MatchCase = 0,
.WholeWord = 0, .PatternMatch = 0, .SoundsLike = 0, .ReplaceAll, .Format = 0,
.Wrap = 1
MsgBox "Removal of Unwanted Paragraph Marks now complete ! "
End Sub
M. InnesHope this Helps !
---
---------------
* Origin: Melbourne PC User Group BBS (3:632/309)
|