Select text except hyperlinks?
Solution 1:
After setting the font settings, run this macro to reset the font style for all hyperlinks.
Sub RestoreHyperlinkStyle()
Dim hl As Hyperlink
For Each hl In ActiveDocument.Hyperlinks
hl.Range.Style = wdStyleHyperlink
Next
End Sub