Lien Hypertexte en VBA Résolu/Fermé

Question

Bonjour à tous, 

Voilà, je souhaiterais créer un fichier excel avec du code VBA dont les caractéristiques seraient les suivantes : 
- Dans la colonne A, des données du type AM2345 (2 lettres + 4 chiffres) 
- Dans la colonne B, un lien hypertexte créé automatiquement appelé "Dossier AM2345" 
- Il faut que le lien hypertexte m'ouvre le dossier "AM2345" dont le chemin est K:\DOSSIERS\AM2345 (il faut en fait que le lien hypertexte ouvre le dossier dont le nom est strictement celui présent dans la cellule de la même ligne dans la colonne A). 

Je sais pas si tout cela est faisable. Mais je vous remercie beaucoup d'avance pour votre réflexion sur mon problème. 

Cordialement.

PlacageGranby · Answer

Bonjour,

Voici en gros quelque ligne de code qui pourront t'inspirer.

Sub hypertexte ()
Dim Dernligne, Debut, I as long

Debut = 2
DernLigne = Range("A65536").End(xlUp).Row

For i = Debut to dernligne
ActiveSheet.Hyperlinks.Add Anchor:=Range("B" & i), Address:="K:\dossiers\" & Range("A" & i).value, TextToDisplay:="Dossier " & Range("A" & i).value
next i
End Sub

Kuartz · Answer

Merci :)

Lien Hypertexte en VBA

2 réponses

Discussions similaires