Highlight a line of text if it only contains black characters.

gmaxey · #5 04-20-2025, 05:09 AM

Graham has provide a solution that works for you. However, to your stated requirement "bulleted" text, the following minor modification will limit processing only to those type paragraphs:

Code:

Sub ScratchMacro()
'A basic Word Macro modified by Gregory K. Maxey
Dim oRng As Range
Dim oPara As Paragraph
    For Each oPara In ActiveDocument.Paragraphs
      If oPara.Range.ListFormat.ListType = wdListBullet Then
        If oPara.Range.Font.ColorIndex = wdAuto Then
            oPara.Range.HighlightColorIndex = wdYellow
        End If
      End If
    Next oPara
lbl_Exit:
  Exit Sub
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Help to Highlight a cell that has less than 5 characters	Cendrinne	Word VBA	12	11-08-2020 11:05 PM
Extract Line of Text w/ specific characters up to the paragraph character, send to Excel	dmarie123	Word VBA	10	07-20-2015 12:16 AM
Highlight only the characters ER when it occurs in SEVERE.	norgro	Word VBA	3	02-18-2013 05:14 PM
How to import a text file but skip the first line regardless of characters?	omahadivision	Excel Programming	7	02-01-2013 08:30 PM
Highlight the first X number of characters	14spar15	Word	1	11-13-2011 11:17 PM