Ecriture de la fonction FollowHyperlink

Re : Ecriture de la fonction FollowHyperlink

Bonjour Methylos,

cela a plus de chance de fonctionner sans le select:


A bientôt

Re : Ecriture de la fonction FollowHyperlink

Bonjour à tous,

la fonction LIEN_HYPERTEXTE peut être intéressante également et s'éviter du VBA dans beaucoup de cas...

Re : Ecriture de la fonction FollowHyperlink

Merci a vous deux,

Quelle rapidité, je suis soufflé 😱

Cependant cela ne marche pas il me met une erreur bâtarde 1004.

Sub Go_URL()
ActiveWorkbook.FollowHyperlink Address:=Range(ActiveCell), NewWindow:=True
End Sub
comme hasco me la dit heu écrit 😀
Hasco il y a t il un format a mettre dans la cellule peut etre ...😕

Tototiti2008 comment adapter la fonction lien_hypertext dans un userform.

l'adresse se trouvant dans une textBox.

Sub Go_URL()
ActiveWorkbook.FollowHyperlink Address:=textbox.value, NewWindow:=True
End Sub

j'essaye de me faire une p'tit appli excel de referencement de site

merci par avance

Re : Ecriture de la fonction FollowHyperlink

Bonjour Methylos,

désolé, je croyais que tu voulais créer des liens dans les cellules (encore à côté, moi)

ceci dit, je crois que ton soucis vient de :

Address:=Range(ActiveCell)

moi je mettrais :

Address:=Activecell

ou éventuellement (si ça ne marche pas) :

Address:=Activecell.Value