![]() |
#1
|
|||
|
|||
![]()
Hello all.
I'm trying to find a way to highlight word and sentences in a file from a list located in another file. I found a a macro online but the problem is that it will highligh all single words. What should I do if I want to highlight a list of strings composed of several words (Like phrasal verb or expression for exemple) For exemple, I want it to highlight all "Fill out" but leaving alone all "fill" and "out" that are not a part of "Fill out" Thank you the Macro I found on https://wordribbon.tips.net/ is: Sub CompareWordList() Dim sCheckDoc As String Dim docRef As Document Dim docCurrent As Document Dim wrdRef As Object sCheckDoc = "c:\checklist.doc" Set docCurrent = Selection.Document Set docRef = Documents.Open(sCheckDoc) docCurrent.Activate Options.DefaultHighlightColorIndex = wdYellow With Selection.Find .ClearFormatting .Replacement.ClearFormatting .Replacement.Highlight = True .Replacement.Text = "^&" .Forward = True .Format = True .MatchWholeWord = True .MatchCase = True .MatchWildcards = False End With For Each wrdRef In docRef.Words If Asc(Left(wrdRef, 1)) > 32 Then With Selection.Find .Wrap = wdFindContinue .Text = Trim(wrdRef) .Execute Replace:=wdReplaceAll End With End If Next wrdRef docRef.Close docCurrent.Activate End Sub |
Tags |
highlight, vba, word 2016 |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
![]() |
Nanaia | Word VBA | 3 | 09-07-2018 02:13 PM |
![]() |
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 |