Microsoft 365 insérer un lien hypertexte par VBA

[Didier03]

Bonjour tout le monde ,
est il possible , avec un bouton sur une feuille excel , de mettre un lien Hypertexte par VBA?
je m'explique;

sur le fichier ci-joint , je voudrai que dans la colonne D il cherche la première cellule vide, qu'il regarde dans la colonne B le numéro qu'il y a et qu'il aille chercher ce numéro version PDF dans un autre dossier et qu'il mette le lien Hypertexte dans la colonne D
j'espère que j'ai bien expliqué ....
j'ai mis version PDF car dans le dossier il y a aussi une version xlsm ...

merci beaucoup , en vous souhaitant une bonne fin de semaine et bon week-end

 

[vgendron]

Bonjour

en Colonne D, tu peux peut-être utiliser la fonction "=Lien_Hypertexte() " ??

Si toutes tes FAQ sont dans le meme répertoire (RepFaq par exemple), ca donnerait

=LIEN_HYPERTEXTE("C:\RepFaq\" &B4;B4)

 

[Didier03]

Bonjour

en Colonne D, tu peux peut-être utiliser la fonction "=Lien_Hypertexte() " ??

Si toutes tes FAQ sont dans le meme répertoire (RepFaq par exemple), ca donnerait

d'accord ,je vais tester ça , merci beaucoup

 

[Didier03]

ah le truc c'est que dans le dossier j'ai deux sauvegardes du même nom ,1 en PDF et l'autre en XLSM et faudrait celle en PDF en lien hypertexte

 

[vgendron]

Dans ce cas, je pense qu'il suffit de préciser l'extension du fichier cible

=LIEN_HYPERTEXTE("C:\RepFaq\" &B4 &".pdf";B4)

 

[Didier03]

ok merci beaucoup , je suis un peu à la rue dans tout ça lol

 

[Didier03]

faut juste que je comprenne pourquoi quand je met bien l'adresse du répertoire dans la formule il me met un lien hypertexte provenant d'un autre répertoire

 

[Didier03]

mon répertoire s"appelle 2023_MlsP_Fiches Alertes Qualité et il va me chercher un lien dans le répertoire 2014_MlsP_Fiches Alertes Qualité ....

 

[vgendron]

est ce que ce répertoire (2014_MlsP_Fiches Alertes Qualité) est le répertoire actif de ton classeur?
si oui, c'est sans doute que le chemin que tu spécifies dans la fonction n'est pas bon ou incomplet.. et donc. excel prend le repertoire actif à la place..

 

[Didier03]

qu'est ce que tu entends par actif??
Dans un dossier j'ai chaque dossier par année comme ça :

 

[vgendron]

dossier actif = dossier dans lequel est enregistré le classeur que tu utilises (MiSP_SuivieAlertes....)

 

[Phil69970]

Bonjour à tous

Je te propose un essai :

=LIEN_HYPERTEXTE("C:\2014_MlsP_Fiches Alertes Qualité\"& B4 & ".pdf";B4)

Encore faut il que la lettre du lecteur soit la bonne !


@Phil69970

 

[Didier03]

Bonjour Phil ,
je dois faire quelque chose de mal .... j'ai mis ce que tu proposes en remplaçant 2014 par 2023 et ben il va me chercher dans le dossier 2014 ....

ces dossiers de chaque année sont dans un dossier qui s'appelle alerte qualité .....

 

[Didier03]

j'ai essayé en changeant 2023, j'ai mis 2021.2020...... ça fait pareil

 

[Didier03]

heu désolé j'ai trouvé le problème ....... j'ai oublié de changer le numéro de la cellule j'étais pas dans la cellule pour B4 ........ désolé ...... ça marche nickel !!!!!!!!!