Thread: [Solved] find and replace in bold
View Single Post
 
Old 07-27-2014, 07:40 AM
redzan redzan is offline Windows 7 32bit Office 2003
Advanced Beginner
 
Join Date: Feb 2012
Posts: 37
redzan is on a distinguished road
Default find and replace in bold

How do I make the following macro replace in bold?

With Selection.Find
.Text = "plan"
.Replacement.Text = "ASSESSMENT AND PLAN:"
.Forward = True
.Wrap = wdFindContinue
.Format = True
.MatchCase = False
.MatchWholeWord = False
.MatchKashida = False
.MatchDiacritics = False
.MatchAlefHamza = False
.MatchControl = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Reply With Quote