How do I select all text highlighted in a specific colour?

bertietheblue · #1 04-15-2016, 02:33 AM

Hi

I want to remove the highlight from all text highlighted in yellow but not from text highlighted in any other colour. Could anyone tell me how to do this as a 'Replace All' function? Thanks.

gmayor · #2 04-15-2016, 06:58 AM

How about

Code:

Sub Macro1()
Dim oRng As Range
    Set oRng = ActiveDocument.Range
    With oRng.Find
        .Highlight = True
        Do While .Execute
            If oRng.HighlightColorIndex = wdYellow Then
                oRng.HighlightColorIndex = wdAuto
            End If
            oRng.Collapse 0
        Loop
    End With
lbl_Exit:
    Set oRng = Nothing
    Exit Sub

bertietheblue · #3 04-15-2016, 12:30 PM

Much appreciated!

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
I need to convert shaded text into highlighted text on about 80 different long documents. VBA macro?	AustinBrister	Word VBA	8	05-28-2015 02:42 PM
Quickly select lines of certain colour	RFoudy	PowerPoint	27	09-09-2014 12:35 AM
Formatting- Apply changes to highlighted text results in same change to other text	sential	Word	6	01-10-2014 03:22 PM
Quickest way to change text to Arial size 11 specific colour	BlueClearSky	Word	6	11-22-2013 03:34 PM
How to filter sentences wth highlighted colour	rajpes	Word	4	02-25-2011 12:43 AM