Essaye de partager ton fichier stp ou un fichier exemple.
Je comprends bien que tu as un problème d'hypertexte mais si je ne sais pas vers où ils mènent (l'adresse est-elle indiquée quelque part?), si il y'en a 2-3 à faire (à ce compte la tu le fais à la main) où une grande quantité donc tu souhaiterais avoir un processus pour les traiter.
Option Explicit
Public Sub CreerLiensHypertexte()
Dim Cell As Range
Application.ScreenUpdating = False
For Each Cell In Range("A1:A" & Range("A1").End(xlDown).Row)
ActiveSheet.Hyperlinks.Add _
Anchor:=Cell, _
Address:=Cell.Value, _
TextToDisplay:=Cell.Value
Next
End Sub
Sub TestHyperlien()
Dim Cell As Range
For Each Cell In Range(Range("A1"), Range("A1").End(xlDown))
ActiveSheet.Hyperlinks.Add Anchor:=Cell, Address:=Cell.Value
Next Cell
End Sub