Comment créer une liste déroulante avec plusieurs cases à cocher dans Excel ?

Les listes déroulantes traditionnelles dans Excel limitent l’utilisateur à une seule sélection. Pour contourner cette limitation et permettre des sélections multiples, nous allons explorer deux méthodes pratiques afin de créer des listes déroulantes avec plusieurs cases à cocher.

Utiliser une zone de liste pour créer une liste déroulante avec plusieurs cases à cocher
A : Créer une zone de liste avec Données source
B : Nommer la cellule dans laquelle vous placerez la Nombre d'éléments sélectionnés
C : Insérer une forme pour faciliter la sortie de la Nombre d'éléments sélectionnés
Créer facilement une liste déroulante avec cases à cocher grâce à un outil exceptionnel
Plus de tutoriels sur les listes déroulantes...

Utiliser une zone de liste pour créer une liste déroulante avec plusieurs cases à cocher

Comme le montre la capture d’écran ci-dessous, tous les noms de la plage A2:A11 de la feuille de calcul actuelle servent de données source à la zone de liste située en cellule C4. En cliquant sur cette zone, la liste des éléments sélectionnables s’affiche, et le nombre d’éléments sélectionnés apparaît en cellule E4. Pour obtenir ce résultat, suivez ces étapes :

A. Créez une zone de liste à l’aide de Données source

1. Cliquez sur Développeur > Insérer > Zone de liste (contrôle ActiveX). Voir la capture d’écran :

2. Dessinez une zone de liste dans la feuille de calcul actuelle, cliquez dessus avec le bouton droit, puis sélectionnez Propriétés dans le menu contextuel.

3. Dans la boîte de dialogue Propriétés, configurez les paramètres comme suit.

• 3,1 Dans la zone ListFillRange, saisissez la Plage source que vous souhaitez afficher dans la liste (ici, j’entre la plage)A2:A11);
• 3,2 Dans la zone ListStyle, sélectionnez 1 - fmListStyleOption;
• 3,3 Dans la zone MultiSelect, sélectionnez 1 – fmMultiSelectMulti;
• 3,4 Fermez la boîte de dialogue Propriétés. Voir la capture d’écran :

B : Nommer la cellule dans laquelle vous placerez la Nombre d'éléments sélectionnés

Si vous souhaitez que le nombre total d’éléments sélectionnés s’affiche dans une cellule spécifique, telle que E4, procédez comme suit.

1. Sélectionnez la cellule E4, saisissez ListBoxOutput dans la zone Nom et appuyez sur la touche Entrée.

C. Insérez une forme pour faciliter l’affichage du nombre d’éléments sélectionnés.

1. Cliquez sur Insertion > Formes > Rectangle. Voir la capture d’écran :

2. Dessinez un rectangle sur votre feuille de calcul (ici, je le place dans la cellule C4). Cliquez ensuite avec le bouton droit sur le rectangle, puis sélectionnez Affecter une macro dans le menu contextuel.

3. Dans la boîte de dialogue Affecter une macro, cliquez sur le bouton Nouveau.

4. Dans la fenêtre Microsoft Visual Basic pour Applications qui s’ouvre, remplacez le code d’origine dans la fenêtre Module par le code VBA ci-dessous.

Code VBA : Créer une liste avec plusieurs cases à cocher

Sub Rectangle1_Click()
'Updated by Extendoffice 20200730
Dim xSelShp As Shape, xSelLst As Variant, I, J As Integer
Dim xV As String
Set xSelShp = ActiveSheet.Shapes(Application.Caller)
Set xLstBox = ActiveSheet.ListBox1
If xLstBox.Visible = False Then
    xLstBox.Visible = True
    xSelShp.TextFrame2.TextRange.Characters.Text = "Pickup Options"
    xStr = ""
    xStr = Range("ListBoxOutput").Value
    
    If xStr <> "" Then
         xArr = Split(xStr, ";")
    For I = xLstBox.ListCount - 1 To 0 Step -1
        xV = xLstBox.List(I)
        For J = 0 To UBound(xArr)
            If xArr(J) = xV Then
              xLstBox.Selected(I) = True
              Exit For
            End If
        Next
    Next I
    End If
Else
    xLstBox.Visible = False
    xSelShp.TextFrame2.TextRange.Characters.Text = "Select Options"
    For I = xLstBox.ListCount - 1 To 0 Step -1
        If xLstBox.Selected(I) = True Then
        xSelLst = xLstBox.List(I) & ";" & xSelLst
        End If
    Next I
    If xSelLst <> "" Then
        Range("ListBoxOutput") = Mid(xSelLst, 1, Len(xSelLst) - 1)
    Else
        Range("ListBoxOutput") = ""
    End If
End If
End Sub

Remarque : Dans le code, Rectangle1 est le nom de la forme ; ListBox1 est le nom de la zone de liste ; Sélectionner les options et Pickup Options sont les textes affichés par la forme ; et ListBoxOutput est le nom de la cellule de sortie. Vous pouvez les modifier selon vos besoins.

5. Appuyez simultanément sur les touches Alt + Q pour fermer la fenêtre Microsoft Visual Basic pour Applications.

6. Cliquez sur le bouton rectangulaire pour replier ou développer la zone de liste. Lorsqu’elle est déployée, cochez les éléments souhaités, puis cliquez de nouveau sur le rectangle pour afficher le nombre d’éléments sélectionnés dans la cellule E4. Voir la démonstration ci-dessous :

7. Ensuite, enregistrez le classeur en tant que classeur Excel prenant en charge les macros afin de réutiliser le code ultérieurement.

Créer une liste déroulante avec cases à cocher grâce à un outil exceptionnel

Fatigué(e) des codes VBA complexes ? Kutools pour Excel simplifie la création de listes déroulantes avec cases à cocher, pour une sélection multiple fluide. Idéal pour les sondages, le filtrage de données ou les formulaires dynamiques, cet outil convivial optimise votre flux de travail et vous fait gagner un temps précieux.

1. Ouvrez la feuille de calcul où vous avez appliqué la validation de données Liste déroulante, cliquez sur Kutools > Liste déroulante > Activer la liste déroulante avancée. Ensuite, dans le menu Liste déroulante, cliquez à nouveau sur Ajouter des cases à cocher à la liste déroulante. Voir la capture d’écran :

2. Dans la boîte de dialogue Ajouter des cases à cocher à la liste déroulante, configurez les paramètres comme suit.

• 2,1) Sélectionnez les cellules contenant la liste déroulante ;
• 2,2) Dans la zone Séparateur, saisissez un délimiteur que vous utiliserez pour séparer les éléments multiples ;
• 2,3) Cochez l’option Activer la fonction de recherche selon vos besoins. (Si vous cochez cette option, vous pourrez effectuer une recherche dans la liste déroulante ultérieurement.)
• 2,4) Cliquez sur le bouton OK.

  

Désormais, lorsque vous cliquez sur une cellule contenant la Liste déroulante, une zone de liste apparaît ; cochez les Veuillez sélectionner souhaités pour les afficher dans la cellule, comme illustré dans la démonstration ci-dessous.

Pour en savoir plus sur cette fonctionnalité, consultez ce tutoriel.

Cet article présente deux méthodes pour vous aider à créer facilement des listes déroulantes avec des cases à cocher dans Excel. Choisissez celle qui vous convient le mieux ! Si vous souhaitez découvrir davantage d’astuces Excel, notre site web propose des milliers de tutoriels.

Articles associés :

Meilleurs outils de productivité Office

🤖	Kutools IA Aide: Révolutionnez Analyse des données grâce à :Exécution intelligente   |  Générez du code|  Créez formules personnalisées  |  Analysez des données et générez des graphiques|  Appelez Fonctions améliorées…
	Fonctionnalités populaires:Rechercher, mettre en surbrillance ou Marquer les doublons   |  Supprimer les lignes vides   |  Combinez les colonnes ou cellules sans perdre de données   |   Arrondi sans utiliser de formule...
	Super RECHERCHEV:RechercheValeurs avec critères multiples  |  RechercheValeurs avec valeurs multiples  |   RechercheValeurs dans plusieurs feuilles   |   Correspondance floue....
	Liste déroulante avancée:Créez rapidement une liste déroulante   |  Liste déroulante dépendante   |  Liste déroulante à sélection multiple....
	Gestionnaire de colonnes:Ajouter un nombre précis de colonnes|Déplacer des colonnes|Basculer la visibilité des colonnes masquées|Comparer des plages et des colonnes...
	Fonctionnalités vedettes:Mise au point de la grille   |  Vue de conception   |Barre de formule améliorée   | Gestionnaire de classeurs et de feuilles   |  Bibliothèque de ressources(Texte automatique)|  Sélecteur de date   |  Consolider les feuilles de calcul  |  Chiffrer/Déchiffrer les cellules   | Envoyer des e-mails par liste   |  Super Filtre   |   Filtre spécial(Filtrer les cellules avec une police en gras/italique/barré...) ...
	… et bien plus encore… et plus encore:(,)Supprimer des caractères spécifiques, ...)|   50+Typesde graphiques(, ...)|   40+ Formules pratiques(Calculer l'âge en fonction de la date de naissance, ...)|   19 Outils d’insertion(,Insérer une image depuis un chemin , ...)|   de conversion (Convertir en mots,Conversion de devises, ...)|Fusionner et scinder   (Fusion avancée des lignes,Diviser les cellules , ...)|, ...)   |

Utilisez Kutools dans la langue de votre choix – disponible en anglais, espagnol, allemand, français, chinois et 40+ autres langues !

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...

En savoir plus sur Kutools pour Excel...Téléchargement gratuit...

---

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 !

En savoir plus sur Office Tab...Téléchargement gratuit...

---

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

En savoir plus sur Kutools for Office...Téléchargement gratuit…