Comment remplir une zone de liste déroulante Userform avec tous les noms de feuille dans Excel?
Cet article parle de remplir tous les noms de feuille du classeur actuel dans une zone de liste déroulante de formulaire utilisateur dans Excel.
Remplir une zone de liste déroulante Userform avec tous les noms de feuille avec le code VBA
Remplir une zone de liste déroulante Userform avec tous les noms de feuille avec le code VBA
Le code VBA suivant peut vous aider à insérer tous les noms de feuille du classeur actuel dans une zone de liste déroulante userform. Veuillez faire comme suit.
1. appuie sur le autre + F11 touches simultanément pour ouvrir le Microsoft Visual Basic pour applications fenêtre.
2. dans le Microsoft Visual Basic pour applications fenêtre, veuillez insérer un formulaire utilisateur en cliquant sur insérer > Formulaire utilisateur comme ci-dessous la capture d'écran montrée.
3. Puis dessinez et insérez un contrôle de zone de liste déroulante dans le Userform. Voir la capture d'écran:
4. Cliquez avec le bouton droit de la souris sur la zone de liste déroulante insérée et sélectionnez Voir le code dans le menu contextuel. Voir la capture d'écran:
5. Dans l'ouverture Microsoft Visual Basic pour applications , veuillez copier et coller ci-dessous le code VBA pour remplacer celui d'origine dans la fenêtre Code.
Code VBA: remplissez une zone de liste déroulante Userform avec tous les noms de feuille du classeur actuel
Private Sub UserForm_Initialize()
Dim I As Long
Me.ComboBox1.Clear
For I = 1 To Sheets.Count
Me.ComboBox1.AddItem Sheets(I).Name
Next
Me.ComboBox1.Value = ActiveSheet.Name
End Sub
Notes: Dans le code, ComboBox1 est le nom de la zone de liste déroulante insérée. Veuillez le remplacer par le vôtre.
6. appuie sur le F5 clé pour exécuter le code. Dans le formulaire utilisateur d'ouverture, vous pouvez voir tous les noms de feuille du classeur actuel s'affichent dans la zone de liste déroulante comme ci-dessous capture d'écran:
Répertoriez facilement tous les noms de feuilles dans Excel
La Créer une liste de noms de feuilles utilité de Kutools for Excel peut aider à répertorier facilement tous les noms de feuille de calcul du classeur actif dans une nouvelle feuille de calcul dans Excel. Et vous pouvez passer directement à la feuille de calcul correspondante en cliquant sur le nom de la feuille comme illustré ci-dessous.
Téléchargez et essayez-le maintenant! (essai gratuit de 30 jours)
Articles connexes:
- Comment copier la valeur de la zone de liste déroulante dans la cellule active dans Excel?
- Comment afficher le format de date dans la sortie de la zone de liste déroulante dans Excel?
- Comment ouvrir une feuille de calcul spécifique par la valeur sélectionnée d'une zone de liste déroulante dans Excel?
- Comment empêcher ou désactiver la saisie dans une zone de liste déroulante dans Excel?
- Comment sortir de la zone de liste déroulante pour sélectionner une cellule spécifique dans Excel?
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!