Lancement lien hypertexte contenu dans une cellule

Question

Bonjour à toutes et à tous,

En lançant la commande comme énoncée sur le forum pour executer le lien hyper texte dans une cellule (range"A1".hyperlinks(1).follow NewWindow:=true)
absoluement rien ne se fait alors que le lien revoie à une feuille du même classeur.

Avez-vous une idée  de ce qu'il faut faire de plus pour voir la feuille concernée s'activer?

Bien à vous

Laurent

sylvain_66 · Answer

Bonjour

je souhaite créer une macro où lorsque l'on choisit une cellule avec lien hypertexte, ce lien s'active,
il y a déjà eu demande de faite, la 1ére réponse ne fonctionnait pas car, lien renvoyant un un classeur

une autre réponse a été faite :
Sub Macro1()
 With Selection.Hyperlinks(1)
 .Follow NewWindow:=False, AddHistory:=True
 If .SubAddress <> "" Then
     Sheets(Split(.SubAddress, "!")(0)).Select
     Range(Split(.SubAddress, "!")(1)).Select
    End If
 End With
End Sub


mais là, je n'arrive pas à comprendre ?
à quoi correspond :
Selection.Hyperlinks(1)
SubAddress
Sheet(split
Range(split

Sinon, si vous avez une autre idée, pour activer un lien hypertexte avec un code 

merci d'avance

Lancement lien hypertexte contenu dans une cellule

1 réponse

Votre réponse