You could process all the hyperlinks with a macro such as:
Code:
Sub Demo()
Application.ScreenUpdating = False
Dim HLnk As Hyperlink
For Each HLnk In ActiveDocument.Hyperlinks
With HLnk.Range.Fields(1).Code
.Text = Trim(.Text)
End With
Next
Application.ScreenUpdating = True
End Sub