MS Word find text by colour

Channel:
Subscribers:
58
Published on ● Video Link: https://www.youtube.com/watch?v=fQ0qLwahmOA



Duration: 7:53
438 views
1


Following on from BCTI:-    • Microsoft Word - Revealing the Myster...  

The code for you all to copy and paste:

Dim intStopAtEnd As Integer

Selection.Find.ClearFormatting
Selection.Find.Font.Color = wdColorRed

For intStopAtEnd = ActiveDocument.Words.Count To 1 Step -1
Selection.Find.Execute
Selection.Font.Hidden = Not Selection.Font.Hidden
Next







Tags:
MS Word
VBA
Search by text color