Clear text between specified characters

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Tomislav - 22 Jun 2005 19:25 GMT

Hello,

i am new to Visual Basic and I am trying to make some macros for automated
dictionary reversing. What I must do is find all ranges between characters
"=" and "\" , and then clear them including ending sign "\". I tried few
methods and it always turns out wrong.

Can anyone help ?

Thanks

Tom

Reply to this Message

David Sisson - 22 Jun 2005 21:35 GMT

Sub SearchBetweenCharacters()
Dim rng As Range
Set rng = ActiveDocument.Range

srchstrng = "=*\\"

With rng.Find
Do While .Execute(FindText:=srchstrng, MatchWildcards:= _
True, Wrap:=wdFindStop, _
Forward:=True) = True
MsgBox rng
'rng.Delete
Loop

End With
End Sub

Reply to this Message