Selectionner un lien hypetexte avec userform

Luffy -  
m@rina Messages postés 26456 Statut Contributeur -
Bonjour ,

Ma question est dans le titre lol comment je pourrai faire pour que dans un userforme s'affiche le lien hypertexte d'une cellule et qu'il sois activable à partir de cette userform?

Merci a tous
A voir également:

3 réponses

m@rina Messages postés 26456 Statut Contributeur 11 483
 
Bonjour,

Admettons que tu veuilles afficher dans un label le lien hypertexte d'une cellule :

me.Label1.Caption = sheets(mafeuille).Range(ma cellule).Hyperlinks(1).Address

m@rina



0
Luffy
 
Re,

Dans le cas ou je me trouve la valeur de la cellule varie j'ai essayer de rajouter .Hyperlinks(1).Address à la fin mais sans succès as tu une idée ?

je te mets le code :

Bus = Sheets("base").Cells(L, 5)
Me.Label11.Caption = Bus (c'est à cet endroit que j'ai rajouter le .Hyperlinks(1).Address).

Merci encore pour ton aide
0
m@rina Messages postés 26456 Statut Contributeur 11 483
 
Bonsoir,

Non, ça ne pose pas de problème que la cellule change mais je ne sais pas comment est fait ton code. Il faut bien un événement pour que le label change avec la cellule.

Mets plutôt :

Set Bus = Sheets("base").Cells(L, 5)
Me.Label11.Caption = Bus.Hyperlinks(1).Address).


m@rina
0