(VB Excel) lien hypertexte automatique

1) - Pour ne pas perdre tes liens il faut aller dans Outils, Options, onglet "Géneral", bouton "Option web", et décocher "mettre à jour les liens lors de l'enregistrement"

2) - Voici une macro que j'utilise
Principe :
La colonne B contient le chemin complet + le nom du fichier.
La macro crée un lien à partir de ces données de la 2ème ligne jusqu'à la fin.

Si le nom du fichier se trouve dans la colonne A alors il faut remplacer b par a et choisir la 2ème option en remplacant C:\temp\ par ton chemin.

Dim Lien
Selection.End(xlDown).Select
fin = Selection.Row
For i = 2 To fin
Range("b" & i).Select
Lien = Range("b" & i).Value
If Lien = "" Then GoTo retour
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=Lien

'2ème option : ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="C:\temp\" & Lien
retour:
Next
End Sub