Word : lien hypertexte a supprimer

Sub supp_liens_hyper()
Dim champ As Field 
For Each champ In ActiveDocument.Fields 
If champ.Type = wdFieldHyperlink Then champ.Unlink 
Next champ 
End Sub 

Microsoft Word peut mettre en forme les adresses Web et de
messagerie en tant que liens hypertexte (lien hypertexte : texte souligné
et en couleur ou graphique sur lequel vous cliquez pour atteindre un
fichier, un endroit spécifique dans un fichier, une page Web sur le
World Wide Web ou une page Web sur un intranet. Les liens hypertexte
permettent également d'accéder à des groupes de discussion et à des sites
Gopher, Telnet et FTP.) en cours de frappe, mais vous avez la possibilité
de désactiver cette fonction si vous le souhaitez.

Dans le menu Outils, cliquez sur Options de correction automatique,
puis sur l'onglet Lors de la frappe. 
Sous Remplacer, activez ou désactivez la case à cocher Adresses Internet
et réseau par des liens hypertexte.