Highlight sentences from a list located in another file

Asuryan33 · #6 03-18-2019, 05:09 AM

Hello.

I have a last question.

I see the macro and ... what is beween the first With Selection.Find // End With.. could be moved to the code you added (I tried and it works same)

Also, if I track modification on word, I see that the macro highlight the word first, then erase it and replace it with non highlight word.
If the change tracking is not activated, I see highlited word as final result.

It's not a big deal, since a can desactivate the tracking before the macro. But I'm curious to know why it's like that.

Code:

   With Selection.Find
        .ClearFormatting
        .Replacement.ClearFormatting
        .Replacement.Highlight = True
        .Replacement.Text = "^&"
        .Forward = True
        .Format = True
        .MatchWholeWord = True
        .MatchCase = True
        .MatchWildcards = False
    End With

    For i = 1 To docRef.Paragraphs.Count
        Set oPara = docRef.Paragraphs(i).Range
        oPara.End = oPara.End - 1
        With Selection.Find
            .Wrap = wdFindContinue
            .Text = oPara.Text
            .Execute Replace:=wdReplaceAll
        End With
    Next i

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Highlight words from a list	Nanaia	Word VBA	3	09-07-2018 02:13 PM
how to highlight all "indexed" sentences using find and replace?	smallxyz	Word	2	02-06-2016 02:54 AM
Macro to highlight repeated words in word file and extract into excel file	aabri	Word VBA	1	06-14-2015 07:20 AM
Error: The file may be corrupted, located on a server that is not responding, or read	naeemeh	Excel	2	11-20-2011 03:38 AM
find - reading highlight - highlight all / highlight doesn't stick when saved	bobk544	Word	3	04-15-2009 03:31 PM