Lien hypertexte url affichage sous forme de texte

Bonsoir au forum

,

Je voudrais afficher un lien web sous forme de texte par rapport à une référence.

Je crois qu'il sera plus parlant de regarder mon fichier joint

J’espère que quelqu'un aura une option à me proposer car au départ je pensais que ce serait simple mais après de nombreuses recherches, je me cogne la tête contre le mur.

Merci d'avance

Xni

Bonjour,

Sans VBA je ne sais pas faire...

Ouvre visual Basic ([ALT] + [F11]), va dans le module 1, la macro est commentée.

Du coup dit moi si cela te vas, ou si tu as un problème.

Bonjour

Il suffit de compléter la formule de son second paramètre " ;A1" avant la parenthèse finale

=LIEN_HYPERTEXTE(INDEX($BDD.B:B;EQUIV(A1;$BDD.A:A;0));A1)

@ Moul

Je te remercie pour la proposition, par contre ma base est indépendante, sur un autre fichier, comment faire alors pour la VBA et la liaison avec les feuilles de données?

D'avance merci

Xni

Bonjour

Il suffit de compléter la formule de son second paramètre " ;A1" avant la parenthèse finale

=LIEN_HYPERTEXTE(INDEX($BDD.B:B;EQUIV(A1;$BDD.A:A;0));A1)

Njhub, c'est juste parfait et d'une simplicité qui est parfois...énervante. :)

Je te remercie chaleureusement.

@ Moul

Njhub a trouvé une solution qui me convient, mais je suis tout de même curieux.

Si cela ne te dérange pas, pourrais tu quand même m'indiquer comment présenter la VBA avec une base indépendante?

Merci

Xni

Bonjour,

Si tes données sont sur un autre fichier, il faut simplement créer une variable "workbook" et lui définir le classeur en question.

Ensuite pour définir la feuille de données on fera par exemple

Dim WbDonnées as workbook
Dim MonWb as workbook

Dim WsDonnées as worksheet
Dim MaWs as worksheet

Set MonWb = ActiveWorkbook 'Vu que tu lance ton programme depuis celui ci
Set WbDonnées = workbooks("NomDuClasseur")

Set MaWs = MonWb.worksheets("NomdeLaFeuilleOutuVeuxLeLien")
Set WsDonnées = WbDonnées.worksheets("LaFeuilleOuSeTrouveTesDonnées")

Et du coup après tu ne joueras que avec les MaWs et WsDonnées :

MaWs.cells(1,"A") = WsDonnées.cells(1,"A")

Par contre ce deuxième classeur (donnees doit être ouvert)

J'espère avoir bien compris ta question et y avoir répondu

A bientôt

Merci à toi Moul, je vais également essayer d'appliquer ta méthode histoire d'avancer un peu plus en VBA.

Demande résolue pour ce sujet

Xni

Rechercher des sujets similaires à "lien hypertexte url affichage forme texte"