Comment créer une liste déroulante avec des hyperliens vers chaque feuille dans Excel?
Peut-être avez-vous déjà créé une liste déroulante, mais avez-vous déjà créé une liste déroulante avec les hyperliens vers chaque feuille dans Excel comme illustré ci-dessous?
Créer une liste déroulante avec des hyperliens de feuille
Créer une liste de feuilles avec des hyperliens
Créer une liste déroulante avec lien hypertexte de feuille
Il n'existe qu'un code VBA capable de gérer le travail dans Excel.
1. Cliquez Développeur > insérer > Zone de liste déroulante (contrôles ActiveX).
Remarque: si l'onglet développeur n'apparaît pas dans le ruban, cliquez sur Déposez votre dernière attestation > Options > Personnaliser le ruban, puis vérifiez le Développeur option dans la case de droite. Voir la capture d'écran:
2. Dessinez ensuite une zone de liste déroulante où vous le souhaitez.
3. Cliquez avec le bouton droit sur la feuille que vous venez de dessiner dans la zone de liste déroulante, puis cliquez sur Voir le code dans le menu contextuel.
4. Copiez et collez le code ci-dessous dans le script vide, puis enregistrez-le pour revenir à la feuille.
VBA: créer une liste déroulante avec des liens de feuille
Private Sub ComboBox1_Change()
'UpdatebyExtendoffice20180404
Sheets(Me.ComboBox1.Text).Select
End Sub
Private Sub ComboBox1_GotFocus()
Dim I As Long
Me.ComboBox1.Style = fmStyleDropDownList
If Me.ComboBox1.ListCount <> Sheets.Count Then
Me.ComboBox1.Clear
For I = 1 To ActiveWorkbook.Sheets.Count
Me.ComboBox1.AddItem Sheets(I).Name
Next
End If
Me.ComboBox1.DropDown
End Sub
5. Cliquez Développeur > Mode de conception pour quitter le mode de conception.
Maintenant, toutes les feuilles ont été répertoriées dans la liste déroulante, et il ira à la feuille pendant que vous cliquez sur le nom de la feuille.
Créer une liste de feuilles avec des hyperliens
Si vous souhaitez simplement créer une liste de noms de feuilles cliquables comme illustré ci-dessous, vous pouvez appliquer Kutools for Excel's Create List of Sheet Names fonction qui peut créer une liste d'hyperliens sur les noms de feuille ou une liste de boutons macro sur les noms de feuille.
Kutools for Excel, avec plus de 300 fonctions pratiques, rend vos travaux plus faciles. |
Après l'installation de Kutools for Excel, procédez comme suit:(Téléchargez gratuitement Kutools pour Excel maintenant!)
1. Cliquez Kutools Plus > Feuille > Create List of Sheet Names.
2. dans le Create List of Sheet Names boîte de dialogue, procédez comme suit:
(1). Vérifier Contains a list of hyperlinks< pour créer une liste de noms de feuilles cliquables, ou cochez Contains buttons and macros pour créer des boutons avec un lien vers chaque feuille.
(2). Donnez la nouvelle feuille sur laquelle vous placerez les hyperliens dans un nom.
(3). Spécifiez l'emplacement de la nouvelle feuille.
(4). Spécifiez les liens de feuille affichés sous forme de nombre de colonnes.
3. cliquez sur Ok, maintenant les noms de feuille cliquables ont été affichés dans la nouvelle feuille.
Démo
Meilleurs outils de productivité bureautique
Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 fonctionnalités avancées pour augmenter la productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et facilite grandement votre travail
- Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!