Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- With range.Find
- 'Find all bold words
- .Font.Bold = -1
- 'Replace them with this
- .Replacement.Text = "<b>" & LESTI DE MOT DE MARDE & "</b>"
- 'Execute the query
- .Execute(Replace:=Word.WdReplace.wdReplaceAll)
- End With
Add Comment
Please, Sign In to add comment