highlight words not in list

karkey · #1 01-05-2021, 05:55 AM

highlight words not list in the list word vba

macropod · #2 01-05-2021, 06:52 AM

What have you tried? This isn't simply a free coding forum. You might at least start by researching other threads here for list processing.

karkey · #3 01-05-2021, 07:14 AM

Code:

Sub TagHighlight()
'
' TagHighlight Macro
'
'
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    Selection.Find.Replacement.Highlight = True
    With Selection.Find
        .Text = "\<([A-Z]{2,4})\>"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchCase = False
        .MatchWholeWord = False
        .MatchAllWordForms = False
        .MatchSoundsLike = False
        .MatchWildcards = True
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
    Selection.Find.ClearFormatting
    
    Selection.Find.Replacement.ClearFormatting
    Selection.Find.Replacement.Highlight = True
    With Selection.Find
        .Text = "\<([A-Z][0-9])\>"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchCase = False
        .MatchWholeWord = False
        .MatchAllWordForms = False
        .MatchSoundsLike = False
        .MatchWildcards = True
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
    
    Selection.Find.Replacement.ClearFormatting
    Selection.Find.Replacement.Highlight = True
    With Selection.Find
        .Text = "\<([A-Z]@>)\-([0-9]@>)\>"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchCase = False
        .MatchWholeWord = False
        .MatchAllWordForms = False
        .MatchSoundsLike = False
        .MatchWildcards = True
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
End Sub

I tried Paul for highlight

macropod · #4 01-05-2021, 02:13 PM

That's simply some code produced by the macro recorder to highlight:
• upper-case words of 2 to 4 characters
• single capitals and numbers bounded by < & >
• strings of capitals followed by numbers from which they are separated by '-' and bounded by < & >
As such it does the opposite of what you describe.

As I said:

Quote:

You might at least start by researching other threads here for list processing

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 find (highlight) two and more words in a list of 75k single words in Word 2010	Usora	Word	8	05-29-2018 03:34 AM
Macro to highlight a list of words	bakerkr	Word VBA	4	10-19-2017 02:23 PM
Highlight Words from a Word List	JSC6	Word VBA	1	09-30-2014 08:22 PM
Using macros to highlight worksheet words referenced in external list/doc.	Daniel_NYC	Word VBA	1	04-21-2014 03:35 PM