Comment sélectionner plusieurs éléments dans une liste déroulante intégrée à une cellule Excel ?
La gestion des données dans Excel passe souvent par la sélection d’options dans des listes déroulantes. Mais comment faire lorsqu’il faut choisir plusieurs éléments et les afficher tous dans une seule cellule ? Même si Excel ne propose pas cette fonctionnalité nativement, ce guide vous présente, étape par étape, les meilleures méthodes pour activer la sélection multiple dans vos listes déroulantes Excel.
 |  |  |
Utiliser du code VBA pour sélectionner plusieurs éléments depuis une liste déroulante
Utiliser du code VBA pour sélectionner plusieurs éléments depuis une liste déroulante
Voici quelques codes VBA qui vous aideront à accomplir cette tâche.
Sélectionner des éléments en double depuis une liste déroulante dans une cellule
1. Après avoir créé une liste déroulante, cliquez avec le bouton droit sur l’onglet de la feuille, puis sélectionnez « Afficher le code » dans le menu contextuel.
2. Ensuite, dans la fenêtre « Microsoft Visual Basic pour Applications », copiez-collez le code ci-dessous dans le module vierge.
VBA : Sélectionner plusieurs éléments depuis une liste déroulante dans une cellule
Private Sub Worksheet_Change(ByVal Target As Range)
'UpdatebyExtendoffice20221111
Dim xRgVal As Range
Dim xStrNew As String
On Error Resume Next
Set xRgVal = Cells.SpecialCells(xlCellTypeAllValidation)
If (Target.Count > 1) Or (xRgVal Is Nothing) Then Exit Sub
If Intersect(Target, xRgVal) Is Nothing Then Exit Sub
If Target.Value = "" Then Exit Sub
Application.EnableEvents = False
xStrNew = Target.Value
Application.Undo
If xStrNew = Target.Value Then
Else
xStrNew = xStrNew & " " & Target.Value
Target.Value = xStrNew
End If
Application.EnableEvents = True
End Sub3. Enregistrez le code et cliquez sur « Fermer cette fenêtre » pour revenir à la liste déroulante. Vous pouvez désormais sélectionner plusieurs éléments dans cette liste.
Remarque :
1. Avec ce code VBA, les éléments sont séparés par un espace. Vous pouvez personnaliser la ligne « xStrNew = xStrNew & « » & Target.Value » pour utiliser le délimiteur de votre choix. Par exemple, en remplaçant l’espace par une virgule — « xStrNew = xStrNew & "," & Target.Value » — vos éléments seront séparés par des virgules.
2. Ce code VBA s’applique à toutes les listes déroulantes de la feuille.
Sélectionner plusieurs éléments depuis une liste déroulante dans une cellule sans doublons
Si vous souhaitez sélectionner uniquement des éléments uniques dans la liste déroulante d’une cellule, répétez les étapes ci-dessus et utilisez le code suivant.
VBA : Sélectionner plusieurs éléments depuis une liste déroulante dans une cellule sans doublons
Private Sub Worksheet_Change(ByVal Target As Range)
'UpdatebyExtendoffice20221111
Dim I As Integer
Dim xRgVal As Range
Dim xStrNew As String
Dim xStrOld As String
Dim xFlag As Boolean
Dim xArr
On Error Resume Next
Set xRgVal = Cells.SpecialCells(xlCellTypeAllValidation)
If (Target.Count > 1) Or (xRgVal Is Nothing) Then Exit Sub
If Intersect(Target, xRgVal) Is Nothing Then Exit Sub
If Target.Value = "" Then Exit Sub
Application.EnableEvents = False
xFlag = True
xStrNew = " " & Target.Value & " "
Application.Undo
xStrOld = Target.Value
If InStr(1, xStrOld, xStrNew) = 0 Then
xStrNew = xStrNew & xStrOld & " "
Else
xStrNew = xStrOld
End If
Target.Value = xStrNew
Application.EnableEvents = True
End Sub
Aucun des deux codes VBA présentés ci-dessus ne permet de supprimer une partie spécifique du contenu d’une cellule ; ils autorisent uniquement l’effacement complet de tout ce qu’elle contient.
Utiliser Kutools pour Excel pour sélectionner facilement plusieurs éléments depuis une liste déroulante
Simplifiez votre flux de travail Excel avec « Kutools pour Excel » ! Grâce à sa fonctionnalité « Créer une liste déroulante avec des sélections multiples », sélectionnez facilement plusieurs éléments depuis une liste déroulante et voyez-les automatiquement regroupés dans une seule cellule — sans avoir recours à un codage VBA complexe. Dites adieu aux procédures manuelles fastidieuses et adoptez une méthode plus intelligente et fluide pour gérer vos listes déroulantes dans Excel.
1. Cliquez sur « Kutools » > « Liste déroulante » > « Activer la liste déroulante avancée », puis sélectionnez à nouveau « Créer une liste déroulante avec des sélections multiples » dans le menu « Liste déroulante ». Consultez les captures d’écran :
 |  |  |
2. Dans la boîte de dialogue « Créer une liste déroulante avec des sélections multiples », configurez les options 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. (En la cochant, vous pourrez effectuer une recherche dans la liste déroulante par la suite.)
- 2,4) Cliquez sur le bouton « OK ».
Désormais, lorsque vous cliquez sur une cellule contenant une liste déroulante, une zone de liste s’affiche. Cliquez sur le bouton ➕ pour ajouter des éléments à la cellule, ou sur le bouton ➖ pour supprimer un élément selon vos besoins. Découvrez la démonstration ci-dessous :
Sélectionner plusieurs éléments dans une liste déroulante Excel n’a pas à être une tâche compliquée. Grâce aux méthodes détaillées pas à pas dans ce guide, vous pouvez rapidement activer la sélection multiple à l’aide d’un code VBA ou simplifier le processus avec un outil comme Kutools pour Excel. Si vous souhaitez découvrir davantage d’astuces et de conseils Excel,notre site web propose des milliers de tutoriels.
Articles associés :
Insérer une liste déroulante dans Excel
Simplifiez-vous la vie — ou celle de vos collaborateurs — lors de la saisie de données dans vos feuilles de calcul grâce aux listes déroulantes. Elles vous permettent de sélectionner instantanément une valeur au lieu de la saisir manuellement !
Liste déroulante avec sélections multiples
Par défaut, une liste déroulante créée via la validation des données dans Excel ne permet de sélectionner qu’un seul élément à la fois. Mais comment faire pour choisir plusieurs options dans cette même liste déroulante, comme le montre la capture d’écran ci-dessous ? Les méthodes présentées dans cet article vous offrent une solution simple et efficace à ce problème.
Saisie semi-automatique lors de la frappe dans une liste déroulante Excel
Lorsque votre liste déroulante, créée via la validation des données, contient de nombreuses options, vous devez soit faire défiler toute la liste pour trouver celle qu’il vous faut, soit saisir le mot complet directement dans la cellule. Imaginez s’il existait une solution permettant une saisie semi-automatique dès la première lettre tapée — tout deviendrait bien plus simple !
Créer une liste déroulante interrogeable dans Excel
Lorsqu’une liste déroulante contient de nombreuses options, il devient difficile d’y repérer rapidement celle que vous cherchez. Nous avons déjà présenté une méthode permettant une saisie semi-automatique dès la première lettre tapée dans le champ de la liste déroulante. En complément, vous pouvez également rendre cette liste interrogeable pour gagner encore en efficacité et trouver instantanément les bonnes valeurs.
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