(VB Excel) lien hypertexte automatique

Merci! Même si ce post est extrêmement vieux... Après des heures de recherches , tu viens de me sauver la vie!

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

@kikiMerci beaucoup. Aprè qques ajustements, début et fin macro, votre macro marche à merveille et c'est très précieux pour le classement et la visualisation de photos à partir d'un tableau EXCEL les classant par thèmes.

Vous m'avez rendu un sacré service

Didou