Turning active hyperlinks back to blue

I selected all the text in a document and colored it all black (which is what I wanted to do). I didn't realize that the document had some hyperlinks in it (several pages in, in a very long document), so now I can't tell where the hyperlinks are, although I know it's working. Since there are many links, how can I turn the links back to underlined blue (as they should be) without having to go to each one and turning it blue?

Resetting the style of all Hyperlinks back to default requires a VBA Macro.

Code:

Sub RestoreHyperlinkStyle()
    Dim hl As Hyperlink
    For Each hl In ActiveDocument.Hyperlinks
        hl.Range.Style = wdStyleHyperlink
    Next
End Sub

Steps:

1. Press Alt+F11 to open Microsoft Visual Basic for Applications.
2. Double-click on "ThisDocument".
3. Paste the code from the block above into the editor.
4. Press F5 to run the code.
5. Delete the code from the editor window to prevent Word from saving with Macros.

But sometimes you just want to set one hyperlink back to blue. For example: You create an email in Outlook (same word editor) and paste a hyperlink into it. You click on the hyperlink to make sure it's going where you intended - that turns it purple. You don't want to send the email with a purple hyperlink.

So, just right-click on the hyperlink and from the context menu select "Edit Hyperlink". It brings up the edit dialog box. Click on "OK". The hyperlink is returned to it's original blue state. Simple and quick.

Try the following, it works in Word 2013 and I think it should work in 2010 as well:

• From the Home tab on the ribbon, choose Find -> Advanced Find...
• Leave Find what blank.
• At the bottom, choose Format -> Style...
• Choose Hyperlink and press OK to close the dialog and return to the previous one.
• Choose Find In -> Main Document
• All the hyperlinks will be highlighted.
• From the ribbon, choose Styles -> Clear Formatting. The default colour will be restored.