Find and Replace

[Island Girl]

Is there any setting I can use so that each time I go to Find and Replace the
dialog box will be empty? As it is now, each time I go there, the same
"finds and replaces" I used days ago are still there! Drives me crazy,
especially when I'm trying my best to record a macro.

 

[Jerry]

Hi,
What version of Word are you using?
Jerry

 

[Greg Maxey]

Island Girl,

See:
http://word.mvps.org/FAQs/MacrosVBA/ClearFind.htm

 

[Greg Maxey]

BTW, with a smidgen of help from Jay Freedman, I have recreated the macro
for underline text in quotes:

Sub FindAndUnderlineTextInQuotes()

'Underlines text exclusive of the quotes marks
Dim oRng As Range
Set oRng = ActiveDocument.Content

With oRng.Find
.ClearFormatting
.Text = """<*>"""
.Forward = True
.Wrap = wdFindStop
.MatchWildcards = True
Do While .Execute
With oRng
.MoveEnd Unit:=wdCharacter, Count:=-1
.MoveStart Unit:=wdCharacter, Count:=1
.Font.Underline = True
.Collapse wdCollapseEnd
End With
Loop
End With
End Sub

 

[Island Girl]

Greg, thanks for both answers! I'll put them both to work in quick order. I
appreciate all that you and the "community" do for me and others. Can't
thank you enough!

 

[Island Girl]

Hi, Jerry:

Greg answered my question, but I sure do appreciate your asking. I'm using
Word 2003.

 

[Klaus Linke]

There are macros on the MVP FAQs, too (though they are a bit unwieldy since
Dave Rado added code to handle "run-in" paragraph quotes (something I
didn't even know existed).
http://word.mvps.org/FAQs/MacrosVBA/ReplaceQuotes.htm

Regards,
Klaus