![]() |
#6
|
||||
|
||||
![]()
Selection.Paragraphs(1) will work. There is no need to select the paragraph. You do however have to stop the search when the range has been processed.
Code:
Sub TestV3() ' ' Dim Rng As Range Set Rng = Selection.Paragraphs(1).Range With Rng.Find .ClearFormatting .Replacement.ClearFormatting .Text = "[no?ooo~uo]" .Replacement.Text = "" .Wrap = wdFindStop 'stop the search .Format = True .Execute Replace:=wdReplaceAll End With Set Rng = Nothing End Sub
__________________
Graham Mayor - MS MVP (Word) (2002-2019) Visit my web site for more programming tips and ready made processes www.gmayor.com |
Tags |
find & replace, word 19, word vba |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
Applying a VBA code only on a selected table | RobertDany | Word VBA | 5 | 10-25-2021 09:28 PM |
Applying a VBA code only on a selected text or range | RobertDany | Word VBA | 2 | 10-09-2021 08:31 AM |
![]() |
cheech1981 | Word | 8 | 08-23-2017 03:07 PM |
![]() |
foxtrot | Word | 3 | 07-24-2012 07:30 AM |
Does Word do this when applying Styles to a paragraph a second time? | Bobosmite | Word | 2 | 04-17-2012 02:13 PM |