Hello world,

I'm pretty sure that I've done this before with Find-Replace (and have not needed to resort to "For each...next" expressions). I can't find any previous posts specifically relating to this:

- Suppose that you have a sentence like "VBAExpress is great." and somewhere else in the document "VBAExpress rocks!".
- I would like to do a find-replace in the document for all instances of "BAEx", for instance, and to make any para in which this is found italics.

My attempt (unsurprisingly) only italicizes the specific word searched for:

' Italicize BAEx paras
Sub BAEx()
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "BAEx"
.Replacement.Font.Italic = True
.Forward = True
.Wrap = wdFindContinue
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub


Any help would be much appreciated!