Comment ouvrir une feuille de calcul en sélectionnant son nom dans une liste déroulante dans Excel ?
Imaginez disposer, dans votre classeur Excel, d’une zone de liste déroulante contenant tous les noms de feuilles. Vous aimeriez ouvrir une feuille spécifique simplement en sélectionnant son nom dans cette liste. Ce guide vous explique pas à pas comment mettre en œuvre cette fonctionnalité à l’aide d’un code VBA : il détaille comment remplir automatiquement la liste déroulante avec les noms des feuilles et activer la navigation souhaitée.
Ouvrir une feuille de calcul en sélectionnant son nom dans une zone de liste déroulante à l’aide d’un code VBA
Le code VBA ci-dessous vous permet d’accéder à une feuille spécifique selon votre sélection dans la liste déroulante d’Excel. Suivez ces étapes :
Remarque : si la zone de liste déroulante ne contient aucun nom de feuille dans votre feuille de calcul, suivez le conseil ci-dessous pour y ajouter rapidement tous les noms de feuilles. Si une zone de liste déroulante contenant déjà tous les noms de feuilles existe, passez directement à l’étape 1.
Conseil : insérez un bouton de commande 1 dans votre feuille de calcul, cliquez dessus avec le bouton droit et sélectionnez Afficher le code dans le menu contextuel. Copiez ensuite le code VBA ci-dessous et collez-le dans la fenêtre Code, puis appuyez sur les touches Alt + Q pour fermer la fenêtre Microsoft Visual Basic pour Applications. Cliquez sur le bouton de commande inséré, et tous les noms des feuilles du classeur actuel seront automatiquement ajoutés à ComboBox1.
Code VBA : ajouter facilement tous les noms de feuilles dans une zone de liste déroulante
Private Sub CommandButton1_Click()
Me.ComboBox1.Clear
Dim strWs As String
Dim i As Integer
For i = 1 To ThisWorkbook.Sheets.Count
Me.ComboBox1.AddItem Sheets(i).Name
Next
End SubSi une zone de liste déroulante contenant déjà tous les noms des feuilles existe, procédez comme suit.
1. Activez le mode Conception sous l’onglet Développeur.
2. Cliquez avec le bouton droit sur la zone de liste déroulante contenant les noms des feuilles, puis sélectionnez Afficher le code dans le menu contextuel.
3. La fenêtre Microsoft Visual Basic pour Applications s’ouvre alors. Remplacez le code VBA d’origine dans la fenêtre Code par le code VBA ci-dessous.
Code VBA : ouvrir une feuille spécifique selon la valeur sélectionnée dans la zone de liste déroulante
Private Sub ComboBox1_Change()
Dim actWsh As String
actWsh = ComboBox1.Text
Worksheets(actWsh).Select
End SubRemarque : dans le code, ComboBox1 est le nom de la zone de liste déroulante contenant les noms des feuilles.
4. Appuyez sur les touches Alt + Q pour fermer la fenêtre Microsoft Visual Basic pour Applications, puis désactivez le mode Conception sous l’onglet Développeur.
Désormais, il suffit de sélectionner n’importe quel nom de feuille de calcul dans la liste déroulante pour ouvrir automatiquement la feuille correspondante.
Lister facilement tous les noms de feuilles de Classeur actuel dans Excel :
Un index de feuilles dans votre classeur vous permet de gérer vos feuilles de calcul plus facilement. Grâce à l’utilitaire Créer une table de liens de Kutools pour Excel, créez en un clic un index regroupant tous les noms des feuilles du classeur actuel. Vous accéderez ensuite instantanément à la feuille de votre choix en cliquant simplement sur son nom dans la feuille d’index. Voir la capture d’écran ci-dessous :
Kutools pour Excel– Boostez Excel avec plus de 300 outils essentiels, pour gagner en rapidité et en simplicité, et profitez des fonctionnalités d’intelligence artificielle pour un traitement de données plus intelligent et une productivité accrue.Obtenez-le dès maintenant
Articles associés:
- Comment copier la valeur sélectionnée dans une liste déroulante vers la cellule active dans Excel ?
- Comment afficher le format de date dans la sortie d’une zone de liste déroulante dans Excel ?
- Comment masquer ou afficher un bouton de commande en fonction de la valeur d’une cellule donnée dans Excel ?
- Comment empêcher ou désactiver la saisie dans une liste déroulante dans Excel ?
- Comment utiliser la touche Tab pour quitter une zone de liste déroulante et sélectionner une cellule spécifique dans Excel ?
Meilleurs outils de productivité Office
Boostez vos compétences Excel avec Kutools pour Excel et découvrez une efficacité inégalée.Kutools pour Excel propose plus de 300 fonctionnalités avancées pour améliorer votre 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 rend votre travail bien plus facile
- Activez 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 vous fait économiser des centaines de clics de souris chaque jour !
Tous les compléments Kutools. Un seul installateur
Kutools for Office regroupe les compléments pour Excel, Word, Outlook et PowerPoint, ainsi que Office Tab Pro, ce qui en fait le choix idéal pour les équipes travaillant à travers les applications Office.
- Suite tout-en-un— Compléments Excel, Word, Outlook et PowerPoint + Office Tab Pro
- Un seul installateur, une seule licence— installation en quelques minutes (compatible MSI)
- Fonctionne mieux ensemble— productivité optimisée dans toutes les applications Office
- Essai gratuit de 30 jours avec toutes les fonctionnalités— aucune inscription, aucune carte bancaire
- Meilleur rapport qualité-prix— économisez par rapport à l’achat de compléments individuels