Bonsoir Titag,
Re Robert,
Si les URLs sont situées dans la colonne C, tu peux lancer la procédure suivante :
Public Sub Liens()
Dim L As Long
With ActiveSheet
For L = 1 To .Range("C65536").End(xlUp).Row
.Hyperlinks.Add Anchor:=.Cells(L, 3), Address:=.Cells(L, 3).Text, TextToDisplay:=.Cells(L, 3).Text
Next L
End With
End Sub
Cordialement,
Didier_mDF