Microsoft Office Forums - View Single Post - [Solved] Macro that changes color of all indented paragraphs

Guessed · 08-01-2016, 06:29 PM

Are you wanting to apply the colour to any paragraph that begins with a tab? If so, you could try this...

Code:

Sub ColourTabParas()
  Dim aPara As Paragraph
  For Each aPara In ActiveDocument.Paragraphs
    If Left(aPara.Range.Text, 1) = vbTab Then aPara.Range.Font.ColorIndex = wdBlue
  Next aPara
End Sub