XL 2016 Créer lien hypertexte à partir d'une liste déroulante

leeroy

XLDnaute Nouveau
Bonjour,

Je souhaterai que le contenu d'une cellule (liste de choix déroulante des feuilles du classeur) devienne un lien hypertexte vers la feuille. Le contenu de la feuille est donc un lien automatique vers l'onglet.

Pour appuyer mon explication douteuse, trouver ci-joint un fichier qui vous aidera à comprendre.

Merci par avance,
Leeroï
 

Pièces jointes

  • Classeur Liens Hypertexte_V0.xlsm
    23.8 KB · Affichages: 18

job75

XLDnaute Barbatruc
Bonjour leeroy, le forum,

On ne voit pas trop l'intérêt de créer des liens hypertextes sur des listes de validation mais bon voyez le fichier joint :
VB:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim r As Range, test As Boolean
Set r = [C3:G7] 'plage à adapter
Application.ScreenUpdating = False
r.Hyperlinks.Delete 'RAZ
On Error Resume Next
For Each r In r
    If r <> "" Then
        test = False
        test = r.Validation.Type = xlValidateList
        If test Then r.Hyperlinks.Add r, "", "'" & r & "'!A1"
    End If
Next
End Sub
A+
 

Pièces jointes

  • Classeur Liens Hypertexte(1).xlsm
    30 KB · Affichages: 24
Dernière édition:

marco22

XLDnaute Occasionnel
Bonjour
j"ai essayé de mettre en application les liens hypertextes avec un menu déroulant mais cela ne fonctionne pas
j'ai copier la page dans mon classeur, j'ai changé le nom des onglets mais ça ne fonctionne pas pourquoi?
 

Discussions similaires

Statistiques des forums

Discussions
311 720
Messages
2 081 900
Membres
101 834
dernier inscrit
Jeremy06510