how to remove highlighting in word document

The one shown in the code check for all highlighting colors and if the color is red, then remove it, otherwise check for another. The main issue is the While loop or any loop that I am using.There is no difference if I keep or remove Format, MatchCase, MatchWholeWord, MatchWildcards, MatchSoundsLike, and MatchAllWordForms.The record marco detect all highlighting color not specific color. Some of the code I got from the record marco feature and from help online.This is why I mentioned the first statement. I noticed if I select at the middle of the document then run the code, the code start from the mouse selection not from the top.Wrap = wdFindStop 'stop at the end of the documentĭo While (.Execute(Forward:=True) = True) = True Selection.GoTo wdGoToPage, wdGoToAbsolute, 1 'Start at the top of the document ' This Macro go through the document and search for any Red color highlighting word and remove it ' Remove Specific Highlighting Color Macro The VBA code that I wrote: Sub RemoveSpecificHighlightingColor() Execute Replace:=wdReplaceAll instead of the loop. Replacement.HighlightColorIndex = wdred and then.

I'm not sure why it gets crashing, but I guess due to the loop that I am using. The following code is either working fine or make the MS Word stop responding. I made a module in MS Word documents that search/find any text highlighting with red color - a text marked with red from the tool shown in the image below. I want to delete the red highlighting color from the MS Word document.

How to remove highlighting in word document