Selection.Hyperlinks (Word)

Renvoie une collection Hyperlinks qui représente tous les liens hypertexte de la sélection spécifiée.

Pour plus d’informations sur le renvoi d’un seul membre d’une collection, voir renvoi d’un objet à partir d’une collection.

If Selection.Hyperlinks.Count >= 1 Then 
 Selection.Hyperlinks(1).Follow 
End If