Find all instances of yellow text and change font color to red

Question

I need a vba macro that searches for all text that has font color as yellow within a MS Word 2007 document and changes it to red. The yellow color won't show in the printouts. Manually selecting and changing will take me hours.

Answer 1

Following on from stakx’s Word 97 solution, here’s what works in Word 2010:

1. Open the Find and Replace dialogue (e.g. Ctrl-H)
2. Click in the "Find what" box.
3. Format drop-down, Font, choose the Font color to be found, OK.
4. Click in the "Replace with" box.
5. Format drop-down, Font, choose the colour to end up with, OK.
6. Observe that the Format: description for "Find what" and "Replace with" is now different.
7. Replace/Replace All/Find Next as desired.

You can determine the original colour as follows:

1. Click on a bit of text with the original colour
2. Open the colour palette. If neither a "Theme color" nor a "Standard color" is selected, you may need to click on "More colors".