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

De nombreux utilisateurs d'Excel ont tendance à créer une liste déroulante avec plusieurs cases à cocher afin de sélectionner plusieurs éléments de la liste à la fois. En fait, vous ne pouvez pas créer une liste avec plusieurs cases à cocher avec la validation des données. Dans ce didacticiel, nous allons vous montrer deux méthodes pour créer une liste déroulante avec plusieurs cases à cocher dans Excel.

Utilisez la zone de liste pour créer une liste déroulante avec plusieurs cases à cocher
A: Créer une zone de liste avec des données source
B: Nommez la cellule dans laquelle vous localiserez les éléments sélectionnés
C: Insérez une forme pour aider à produire les éléments sélectionnés
Créez facilement une liste déroulante avec des cases à cocher avec un outil incroyable
Plus de tutoriels pour la liste déroulante ...

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

Comme illustré ci-dessous, dans la feuille de calcul actuelle, tous les noms de la plage A2: A11 seront les données source de la zone de liste. Cliquez sur le bouton dans la cellule C4 pour afficher les éléments sélectionnés, et tous les éléments sélectionnés dans la zone de liste seront affichés dans la cellule E4. Pour ce faire, procédez comme suit.

A. Créer une zone de liste avec les données source

1. Cliquez Développeur > insérer > Zone de liste (contrôle Active X). Voir la capture d'écran:

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

3. dans le biens boîte de dialogue, vous devez configurer comme suit.

• 3.1 Dans le ListRemplirPlage , entrez la plage source que vous afficherez dans la liste (ici j'entre A2: A11);
• 3.2 Dans le Style de liste boîte, sélectionnez 1 - Option de style fmList;
• 3.3 Dans le Sélection multiple boîte, sélectionnez 1 - fmMultiSelectMulti;
• 3.4 Fermez le biens boite de dialogue. Voir la capture d'écran:

B: Nommez la cellule dans laquelle vous localiserez les éléments sélectionnés

Si vous avez besoin de sortir tous les éléments sélectionnés dans une cellule spécifiée telle que E4, procédez comme suit.

1. Sélectionnez la cellule E4, entrez ListBoxSortie into the Zone Nom et appuyez sur Entrer clé.

C. Insérez une forme pour aider à produire les éléments sélectionnés

1. Cliquez insérer > Formes > Rectangle. Voir capture d'écran:

2. Dessinez un rectangle dans votre feuille de calcul (ici je dessine le rectangle dans la cellule C4). Puis faites un clic droit sur le rectangle et sélectionnez Attribuer une macro dans le menu contextuel.

3. dans le Attribuer une macro boîte de dialogue, cliquez sur le Nouveauté .

4. Dans l'ouverture Microsoft Visual Basic pour applications fenêtre, veuillez remplacer le code d'origine dans le Module fenêtre avec 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; Plus d'options et le Options de ramassage sont les textes affichés de la forme; et le ListBoxSortie est le nom de plage de la cellule de sortie. Vous pouvez les modifier en fonction de vos besoins.

5. presse autre + Q touches simultanément pour fermer le Microsoft Visual Basic pour applications fenêtre.

6. Cliquez sur le bouton rectangle pour plier ou agrandir la zone de liste. Lorsque la zone de liste se développe, vérifiez les éléments de la zone de liste, puis cliquez à nouveau sur le rectangle pour exporter tous les éléments sélectionnés dans la cellule E4. Voir la démo ci-dessous:

7. Et puis enregistrez le classeur en tant que Classeur Excel MacroEnable pour réutiliser le code dans le futur.

Créez une liste déroulante avec des cases à cocher avec un outil incroyable

Outre la démo ci-dessus, nous fournissons également un guide étape par étape pour montrer comment appliquer cette fonctionnalité pour accomplir cette tâche. Veuillez faire comme suit.

1. Ouvrez la feuille de calcul pour laquelle vous avez défini la liste déroulante de validation des données, cliquez sur Kutools > La liste déroulante > Liste déroulante avec cases à cocher > Paramètres. Voir capture d'écran:

2. dans le Liste déroulante avec les paramètres des cases à cocher boîte de dialogue, veuillez configurer comme suit.

• 2.1) Dans le Appliquer à , spécifiez la portée d'application dans laquelle vous allez créer des cases à cocher pour les éléments de la liste déroulante. Vous pouvez spécifier un certaine gamme, feuille de calcul actuelle, classeur actuel or tous les classeurs ouverts en fonction de vos besoins.
• 2.2) Dans le Mode section, choisissez un style dans lequel vous souhaitez sortir les éléments sélectionnés;
• Ici prend le modifier à titre d'exemple, si vous choisissez cette option, la valeur de la cellule sera modifiée en fonction des éléments sélectionnés.
• 2.3) Dans le Séparateur , entrez un délimiteur que vous utiliserez pour séparer les multiples éléments;
• 2.4) Dans le Direction du texte section, sélectionnez une direction du texte en fonction de vos besoins;
• 2.5) Cliquez sur le OK .

3. La dernière étape, cliquez sur Kutools > La liste déroulante > Liste déroulante avec cases à cocher > Activer la liste déroulante des cases à cocher pour activer cette fonction.

À partir de maintenant, lorsque vous cliquez sur les cellules avec la liste déroulante dans une portée spécifiée, une zone de liste apparaîtra, veuillez sélectionner les éléments en cochant les cases à cocher pour sortir dans la cellule comme la démo ci-dessous montrée (prenez le mode Modifier comme exemple ).

Pour plus de détails sur cette fonctionnalité, veuillez visiter ici.

Articles Liés:

Meilleurs outils de productivité bureautique

	Caractéristiques populaires: Rechercher, mettre en évidence ou identifier les doublons   |  Supprimer les lignes vides   |  Combinez des colonnes ou des cellules sans perdre de données   |   Tour sans formule
	Super recherche: VSearchup à critères multiples  |   VSearch à valeurs multiples  |   Recherche virtuelle sur plusieurs feuilles   |   Recherche 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 spécifique de colonnes  |  Déplacer les colonnes  |  Basculer l'état de visibilité des colonnes masquées  |  Comparer les plages et les colonnes
	Caractéristiques en vedette: Mise au point de la grille   |  Voir Design   |   Grande barre de formule   |  Gestionnaire de classeurs et de feuilles   |  Centre de ressources (Texte automatique)   |  Sélecteur de date   |  Combiner des feuilles de travail   |  Crypter/déchiffrer les cellules   |  Envoyer des e-mails par liste   |  Super filtre   |   Filtre spécial (filtre gras/italique/barré...) ...
	Les 15 meilleurs ensembles d'outils:  12 Texte Outils (Ajouter du texte, Supprimer les caractères, ...)   |   50+ Graphique Types (Diagramme de Gantt, ...)   |   40+ Pratique Formules (Calculer l'âge en fonction de l'anniversaire, ...)   |   19 Insertion Outils (Insérer le code QR, Insérer une image à partir du chemin, ...)   |   12 Conversion Outils (Nombres en mots, Conversion des devises, ...)   |   7 Fusionner et fractionner Outils (Lignes de combinaison avancées, Cellules divisés, ...)   |   ... et plus

Boostez vos compétences Excel avec Kutools for Excelet 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...

Lire la suite... Téléchargement Gratuit...

---

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!

Lire la suite... Téléchargement Gratuit...