Excel : lien hypertexte dans liste déroulante
misstyty
Messages postés
5
Statut
Membre
-
gbinforme Messages postés 15481 Date d'inscription Statut Contributeur Dernière intervention -
gbinforme Messages postés 15481 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
Je voudrais savoir si il est possible de créer une liste déroulante qui me renvoie vers d'autres pages. Car j'ai un fichier assez complet avec beaucoup de feuille et plutot que d'utiliser les onglets je préfèrerais mettre une case avec tous mes différents onglets et que quand je clique dessus, j'arrive sur la page concernée.
Merci d'avance pour votre réponse
Je voudrais savoir si il est possible de créer une liste déroulante qui me renvoie vers d'autres pages. Car j'ai un fichier assez complet avec beaucoup de feuille et plutot que d'utiliser les onglets je préfèrerais mettre une case avec tous mes différents onglets et que quand je clique dessus, j'arrive sur la page concernée.
Merci d'avance pour votre réponse
A voir également:
- Excel : lien hypertexte dans liste déroulante
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Si ou excel - Guide
- Déplacer colonne excel - Guide
- Excel trier par ordre croissant chiffre - Guide
1 réponse
bonjour
Tu peux faire cela en associant une macro à l'utilisation de ta liste déroulante.
Je suppose que tu mets ta liste déroulante des onglets en A25 et dans ta feuille concernée tu mets cette macro (mode d'emploi éventuel)
Tu remplaces A25 par ta cellule et A1 par la cellule de l'onglet où tu veux aller.
Sur la cellule destination de chaque onglet tu peux mettre un lien vers ta cellule de liste déroulante pour revenir.
Tu peux faire cela en associant une macro à l'utilisation de ta liste déroulante.
Je suppose que tu mets ta liste déroulante des onglets en A25 et dans ta feuille concernée tu mets cette macro (mode d'emploi éventuel)
Private Sub Worksheet_Change(ByVal sel As Range)
If Not Intersect(sel, [A25]) Is Nothing Then
ActiveSheet.Hyperlinks.Add Anchor:=sel, Address:="", SubAddress:= _
"'" & sel.Value & "'!A1", TextToDisplay:=sel.Value
Selection.Hyperlinks(1).Follow NewWindow:=False
End If
End Sub
Tu remplaces A25 par ta cellule et A1 par la cellule de l'onglet où tu veux aller.
Sur la cellule destination de chaque onglet tu peux mettre un lien vers ta cellule de liste déroulante pour revenir.