Creer lien hypertexte VBA

Bonjour a tous,

Une question : je sais qu'il possible de créer une macro qui me permet de récupérer un lien hypertexte dans mon dossier c:\document...

Mais est il possible de faire que cette macro soit dynamique c'est a dire qu'as chaque fois que je rajoute un numéro de bon de commande dans ma feuille excel, il va me chercher le lien correspondant a ce numéro dans mon dossier c:\document... et il l'applique à ma cellule contenant ce numéro de bon de commande.

Je n'ai pas encore fait le fichier car je voulais savoir si c’était possible avant de me lancer.

Je crois qu'il y a la methode "find" qui doit pouvoir faire sa mais j'en suis pas sure...

Merci de votre

Bonne journée

bonjour

on suppose que le chemin et le répertoire contenant les documents est C:\TonRepertoire

et que les fichiers sont du genre Fichier1.pdf, Fichier2.pdf, etc.

alors

en A1 tu tapes C:\TonRepertoire

en A2 tu tapes Fichier

en A3 tu tapes .pdf

en A4 jusqu'en A100 tu tapes les nombres de 1 à 97

en B4 tu tapes

= LIENHYPRETEXTE($A$1&$A$2&A4&$A$3)

Bonjour,

Merci pour ta réponse ; mais en fait moi je voulais faire sa avec vba.

de mon côté j 'ai tester et je suis arriver au code ci-dessous :

Public Sub lienhypertexte()

Dim celluletrouvee As Range

Dim numero As Variant

Dim ligne As Integer

Dim col As Variant

numero = "4500000308"

Set celluletrouvee = Range("B2:B2000").Find(numero, LookAt:=xlWhole)

Dim chemin As String

chemin = "\\srv-fic\Document$\Personnel\edwards\Desktop\BC SIFAC\SERVICE COMMUNS\4500000308.pdf"

With Worksheets(1)

If celluletrouvee Is Nothing Then

MsgBox "pas trouver le lien"

Else

.Hyperlinks.Add Anchor:=celluletrouvee, Address:= _

chemin

End If

End With

End Sub

Le code fonctionne. Le problème et que j'aimerai faire une boucle car j'ai enormement de référence mais je n'y arrive pas

Je pense qu' il faut également modifier le chemin ...

merci de votre aide

en pj le fichier sur lequel je test.

merci

personne pour répondre

merci