Note: The other languages of the website are Google-translated. Back to English

Comment créer une liste déroulante avec plusieurs sélections ou valeurs dans Excel?

Par défaut, vous ne pouvez sélectionner qu'un seul élément dans une liste déroulante de validation des données dans Excel. Comment pouvez-vous effectuer plusieurs sélections dans la liste déroulante comme illustré ci-dessous ? Les méthodes décrites dans cet article peuvent vous aider à résoudre le problème.

Créer une liste déroulante avec plusieurs sélections avec le code VBA
Créez facilement une liste déroulante avec plusieurs sélections avec un outil incroyable

Plus de tutoriel pour la liste déroulante ...


Créer une liste déroulante avec plusieurs sélections avec le code VBA

Cette section fournit deux codes VBA pour vous aider à effectuer plusieurs sélections dans les listes déroulantes d'une feuille de calcul. Les deux codes VBA peuvent réaliser :

Code VBA 1 : Autoriser plusieurs sélections dans une liste déroulante sans doublons
Code VBA 2 : Autoriser plusieurs sélections dans une liste déroulante sans doublons (supprimer les éléments existants en les sélectionnant à nouveau)

Vous pouvez appliquer l'un des codes VBA suivants pour effectuer plusieurs sélections dans une liste déroulante dans une feuille de calcul dans Excel. Veuillez procéder comme suit.

1. Ouvrez la feuille de calcul contenant les listes déroulantes de validation des données à partir desquelles vous souhaitez effectuer plusieurs sélections. Cliquez avec le bouton droit sur l'onglet de la feuille et sélectionnez Voir le code dans le menu contextuel.

2. dans le Microsoft Visual Basic pour applications fenêtre, copiez le code VBA ci-dessous dans la fenêtre de code. Voir la capture d'écran:

Code VBA 1 : Autoriser plusieurs sélections dans une liste déroulante sans doublons

Private Sub Worksheet_Change(ByVal Target As Range)
    'Updated by Extendoffice 2019/11/13
    Dim xRng As Range
    Dim xValue1 As String
    Dim xValue2 As String
    If Target.Count > 1 Then Exit Sub
    On Error Resume Next
    Set xRng = Cells.SpecialCells(xlCellTypeAllValidation)
    If xRng Is Nothing Then Exit Sub
    Application.EnableEvents = False
    If Not Application.Intersect(Target, xRng) Is Nothing Then
        xValue2 = Target.Value
        Application.Undo
        xValue1 = Target.Value
        Target.Value = xValue2
        If xValue1 <> "" Then
            If xValue2 <> "" Then
                If xValue1 = xValue2 Or _
                   InStr(1, xValue1, ", " & xValue2) Or _
                   InStr(1, xValue1, xValue2 & ",") Then
                    Target.Value = xValue1
                Else
                    Target.Value = xValue1 & ", " & xValue2
                End If
            End If
        End If
    End If
    Application.EnableEvents = True
End Sub

3. appuie sur le autre + Q touches pour fermer le Microsoft Visual Basic pour applications fenêtre.

Vous pouvez maintenant sélectionner plusieurs éléments dans la liste déroulante de la feuille de calcul en cours.

Supposons que vous ayez accidentellement sélectionné un élément et que vous deviez le supprimer sans effacer toute la cellule et recommencer. Le code VBA 2 suivant peut vous rendre service.

Code VBA 2 : Autoriser plusieurs sélections dans une liste déroulante sans doublons (supprimer les éléments existants en les sélectionnant à nouveau)

Private Sub Worksheet_Change(ByVal Target As Range)
'Updated by Extendoffice 2019/11/13
'Updated by Ken Gardner 2022/07/11
Dim xRng As Range
Dim xValue1 As String
Dim xValue2 As String
Dim semiColonCnt As Integer
If Target.Count > 1 Then Exit Sub
On Error Resume Next
Set xRng = Cells.SpecialCells(xlCellTypeAllValidation)
If xRng Is Nothing Then Exit Sub
Application.EnableEvents = False
'If Not Application.Intersect(Target, xRng) Is Nothing Then
If Application.Intersect(Target, xRng) Then
xValue2 = Target.Value
Application.Undo
xValue1 = Target.Value
Target.Value = xValue2
If xValue1 <> "" Then
If xValue2 <> "" Then
If xValue1 = xValue2 Or xValue1 = xValue2 & ";" Or xValue1 = xValue2 & "; " Then ' leave the value if only one in list
xValue1 = Replace(xValue1, "; ", "")
xValue1 = Replace(xValue1, ";", "")
Target.Value = xValue1
ElseIf InStr(1, xValue1, "; " & xValue2) Then
xValue1 = Replace(xValue1, xValue2, "") ' removes existing value from the list on repeat selection
Target.Value = xValue1
ElseIf InStr(1, xValue1, xValue2 & ";") Then
xValue1 = Replace(xValue1, xValue2, "")
Target.Value = xValue1
Else
Target.Value = xValue1 & "; " & xValue2
End If
Target.Value = Replace(Target.Value, ";;", ";")
Target.Value = Replace(Target.Value, "; ;", ";")
If InStr(1, Target.Value, "; ") = 1 Then ' check for ; as first character and remove it
Target.Value = Replace(Target.Value, "; ", "", 1, 1)
End If
If InStr(1, Target.Value, ";") = 1 Then
Target.Value = Replace(Target.Value, ";", "", 1, 1)
End If
semiColonCnt = 0
For i = 1 To Len(Target.Value)
If InStr(i, Target.Value, ";") Then
semiColonCnt = semiColonCnt + 1
End If
Next i
If semiColonCnt = 1 Then ' remove ; if last character
Target.Value = Replace(Target.Value, "; ", "")
Target.Value = Replace(Target.Value, ";", "")
End If
End If
End If
End If
Application.EnableEvents = True
End Sub

Notes:

1). Les valeurs en double ne sont pas autorisées dans la liste déroulante.
2). Le code VBA 2 ci-dessus a été fourni par notre utilisateur enthousiaste Ken Gardner le 2022/07/11.
3). Veuillez enregistrer le classeur en tant que Cahier de travail Excel avec macro-activé afin que le code continue de fonctionner à l'avenir.
4). Après avoir ajouté le code VBA 2, vous pouvez supprimer un élément existant en le sélectionnant à nouveau dans la liste déroulante. Voir le gif ci-dessous :


Créez facilement une liste déroulante avec plusieurs sélections avec un outil incroyable

Ici, nous recommandons fortement le Liste déroulante à sélection multiple caractéristique de Kutools pour Excel pour vous. Avec cette fonctionnalité, vous pouvez facilement sélectionner plusieurs éléments dans la liste déroulante dans une plage spécifiée, la feuille de calcul actuelle, le classeur actuel ou tous les classeurs ouverts selon vos besoins.

Avant d'appliquer Kutools pour Excel, S'il vous plaît téléchargez et installez-le d'abord.

1. Cliquez Kutools > La liste déroulante > Liste déroulante à sélection multiple > Paramètres. Voir capture d'écran:

2. dans le Paramètres de la liste déroulante à sélection multiple boîte de dialogue, veuillez configurer comme suit.

  • 2.1) Spécifiez le champ d'application dans le Appliquer à section. Dans ce cas, je sélectionne Feuille de calcul actuelle du Portée spécifiée la liste déroulante;
  • 2.2) Dans le Direction du texte section, sélectionnez une direction du texte en fonction de vos besoins;
  • 2.3) Dans le Séparateur , entrez un délimiteur que vous utiliserez pour séparer les valeurs multiples;
  • 2.4) Vérifiez le N'ajoutez pas de doublons boîte dans la Options section si vous ne voulez pas faire de doublons dans les cellules de la liste déroulante;
  • 2.5) Cliquez sur le OK bouton. Voir la capture d'écran:

3. Veuillez cliquer Kutools > La liste déroulante > Liste déroulante à sélection multiple pour activer la fonctionnalité.

Vous pouvez maintenant sélectionner plusieurs éléments dans la liste déroulante de la feuille de calcul actuelle ou dans toute étendue que vous avez spécifiée à l'étape 2.

  Si vous souhaitez bénéficier d'un essai gratuit (30 jours) de cet utilitaire, veuillez cliquer pour le télécharger, puis passez à appliquer l'opération selon les étapes ci-dessus.


Articles Liés:

Saisie semi-automatique lors de la saisie dans la liste déroulante Excel
Si vous avez une liste déroulante de validation des données avec de grandes valeurs, vous devez faire défiler la liste vers le bas juste pour trouver la bonne, ou taper le mot entier directement dans la zone de liste. S'il existe une méthode permettant de compléter automatiquement lors de la saisie de la première lettre dans la liste déroulante, tout deviendra plus facile. Ce didacticiel fournit la méthode pour résoudre le problème.

Créer une liste déroulante à partir d'un autre classeur dans Excel
Il est assez facile de créer une liste déroulante de validation des données parmi les feuilles de calcul d'un classeur. Mais si les données de liste dont vous avez besoin pour la validation des données se trouvent dans un autre classeur, que feriez-vous? Dans ce didacticiel, vous apprendrez à créer une liste déroulante à partir d'un autre classeur dans Excel en détail.

Créer une liste déroulante consultable dans Excel
Pour une liste déroulante avec de nombreuses valeurs, trouver la bonne n'est pas une tâche facile. Auparavant, nous avons introduit une méthode de liste déroulante de remplissage automatique lorsque vous entrez la première lettre dans la liste déroulante. Outre la fonction de saisie semi-automatique, vous pouvez également rendre la liste déroulante consultable pour améliorer l'efficacité du travail en trouvant les valeurs appropriées dans la liste déroulante. Pour rendre la liste déroulante consultable, essayez la méthode de ce didacticiel.

Remplir automatiquement d'autres cellules lors de la sélection de valeurs dans la liste déroulante Excel
Supposons que vous ayez créé une liste déroulante basée sur les valeurs de la plage de cellules B8: B14. Lorsque vous sélectionnez une valeur dans la liste déroulante, vous souhaitez que les valeurs correspondantes dans la plage de cellules C8: C14 soient automatiquement renseignées dans une cellule sélectionnée. Pour résoudre le problème, les méthodes de ce didacticiel vous rendront service.

Plus de tutoriel pour la liste déroulante ...


Les meilleurs outils de productivité de bureau

Kutools for Excel résout la plupart de vos problèmes et augmente votre productivité de 80%

  • Réutilisation: Insérer rapidement formules complexes, graphiques et tout ce que vous avez utilisé auparavant; Crypter les cellules avec mot de passe; Créer une liste de diffusion et envoyer des e-mails ...
  • Barre Super Formula (modifiez facilement plusieurs lignes de texte et de formule); Disposition de lecture (lire et modifier facilement un grand nombre de cellules); Coller dans la plage filtréeplus
  • Fusionner les cellules / lignes / colonnes sans perdre de données; Contenu des cellules divisées; Combiner des lignes / colonnes en double... Empêcher les cellules en double; Comparer les gammesplus
  • Sélectionnez Dupliquer ou Unique Lignes; Sélectionnez les lignes vides (toutes les cellules sont vides); Super Find et Fuzzy Find dans de nombreux classeurs; Sélection aléatoire ...
  • Copie exacte Plusieurs cellules sans changer la référence de formule; Créer automatiquement des références à plusieurs feuilles; Insérer des puces, Cases à cocher et plus encore ...
  • Extrait du texte, Ajouter du texte, Supprimer par position, Supprimer l'espace; Créer et imprimer des sous-totaux de pagination; Conversion entre le contenu et les commentaires des cellulesplus
  • Super filtre (enregistrer et appliquer des schémas de filtrage à d'autres feuilles); Tri avancé par mois / semaine / jour, fréquence et plus; Filtre spécial par gras, italique ...
  • Combiner des classeurs et des feuilles de travail; Fusionner les tableaux en fonction des colonnes clés; Diviser les données en plusieurs feuilles; Conversion par lots xls, xlsx et PDFplus
  • Plus de 300 fonctionnalités puissantes. Prend en charge Office / Excel 2007-2019 et 365. Prend en charge toutes les langues. Déploiement facile dans votre entreprise ou organisation. Essai gratuit de 30 jours. Garantie de remboursement de 60 jours.
onglet kte 201905

Office Tab apporte une interface à onglets à Office et simplifie considérablement 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!
bas de cabine
Commentaires (42)
Pas encore de notes. Soyez le premier à évaluer!
Ce commentaire a été minimisé par le modérateur sur le site
Salut, merci pour la solution et le code. Mais l'étape suivante consiste à s'assurer que l'utilisateur ne sélectionne pas de valeurs "dupliquées" dans la liste déroulante. Par exemple, s'il y a 4 éléments dans la liste - orange, pomme, banane, pêche et si l'utilisateur a déjà sélectionné "orange", alors Excel ne doit pas permettre à l'utilisateur de sélectionner "orange" OU cette option doit être supprimée du reste de la liste. Pouvez-vous s'il vous plaît publier le code pour accomplir cette fonctionnalité. Merci. Yezdi
Ce commentaire a été minimisé par le modérateur sur le site
Bonjour Yezdi, Merci pour votre commentaire. Le code a été mis à jour et aucune valeur en double n'est désormais autorisée dans la liste déroulante. Merci. Soleil
Ce commentaire a été minimisé par le modérateur sur le site
C'est formidable que cela permette plusieurs sélections, mais comme l'a commenté @Yezdi, je trouve que cela ajoutera un ou plusieurs doublons même si je ne les choisis pas. Donc, à l'heure actuelle, il s'agit d'une solution à 80 %... à un ajustement près de la perfection. Je ne suis pas un codeur VB ou je proposerais la solution.
Ce commentaire a été minimisé par le modérateur sur le site
Vous pouvez modifier le code dans les lignes suivantes pour éviter les doublons : If xValue2 "" Then Target.Value = xValue1 & ", " & xValue2 End If To: If xValue2 "" Then If CheckIfAlreadyAdded(xValue1, xValue2) = False Then Target .Value = xValue1 & ", " & xValue2 Else Target.Value = xValue1 End If End If And puis ajoutez la fonction suivante : Private Function CheckIfAlreadyAdded(ByVal sText As String, sNewValue As String) As Boolean CheckIfAlreadyAdded = False Dim WrdArray() As String WrdArray() = Split(sText, ",") For i = LBound(WrdArray) To UBound(WrdArray) If Trim(WrdArray(i)) = Trim(sNewValue) Then CheckIfAlreadyAdded = True Next i End Function -- Il y a probablement de meilleures façons de le coder, mais cela fonctionne pour l'instant.
Ce commentaire a été minimisé par le modérateur sur le site
Je viens de réaliser que je n'ai pas quitté la boucle dans la nouvelle fonction si la condition a été définie afin que nous n'ayons pas à vérifier d'autres entrées.
Ce commentaire a été minimisé par le modérateur sur le site
Salut. Merci pour le code et l'ajout pour limiter les doublons. Une autre demande - quel ajout/changement faudrait-il faire pour permettre une sélection multiple dans une ou deux colonnes spécifiques ? Ce code rajoute des lignes de texte à ce qui devrait être des cellules "simples" si je corrige une faute de frappe, ou apporte une modification ou un ajout au texte dans la cellule, au lieu de simplement me comporter "normalement" et d'accepter le changement (sans rajouter à nouveau tout le texte). Par exemple, la colonne A est une colonne "ordinaire". J'écris une phrase "Quels sont les trois articles que tu veux le plus?" La colonne B est une colonne "liste" où je ne veux pouvoir choisir qu'une seule valeur (dans ce cas, disons le nom d'un enfant). La colonne C est une autre colonne "liste" où l'utilisateur doit pouvoir sélectionner plusieurs éléments (ce que ce code me permet de faire parfaitement). Au fur et à mesure, je me rends compte que j'ai fait une faute de frappe dans la colonne A et que je souhaite la corriger. Dans l'état actuel de ce code, si j'entre (double-clic, F2) et que je corrige le mot "items", j'obtiens ce résultat dans ma cellule : "Quels sont les trois éléments que vous souhaitez le plus ? Quels sont les trois articles que vous désirez le plus ? » merci d'avance pour toute aide (de la part d'un utilisateur qui aime VRAIMENT VBA, mais qui en est encore aux tout premiers stades de l'apprentissage !)
Ce commentaire a été minimisé par le modérateur sur le site
J'ai pu faire fonctionner le code, mais lorsque j'ai enregistré le document (avec les macros activées), l'ai fermé et renvoyé, le code ne fonctionnait plus (bien qu'il soit toujours là). Je n'arrive pas à comprendre ce que j'ai fait de mal. Des idées?
Ce commentaire a été minimisé par le modérateur sur le site
Bonjour Cynthia, Si l'auteur original ne répond pas, je vous répondrai mais je ne serai de nouveau devant un ordinateur que le 29 décembre. Je ne suis pas non plus programmeur VBA. Ce que vous pouvez faire en attendant, c'est rechercher sur Google comment identifier le numéro de colonne et ne laisser le code s'exécuter que si les données sont modifiées dans cette ou ces colonnes spécifiques. Je l'ai fait mais le code est sur mon PC de travail et je ne m'en souviens pas pour le moment, essayez peut-être de mettre un debug.print sur target.column ou quelque chose à cet effet pour voir s'il vous donne le numéro de colonne en cours d'édition . Désolé Jennifer, je ne suis pas sûr du problème que vous rencontrez :(
Ce commentaire a été minimisé par le modérateur sur le site
@Cynthia, si cela est toujours nécessaire, vous devriez pouvoir faire quelque chose comme ça pour vous assurer que le code ne s'exécute que sur des colonnes spécifiques, dans mon cas, les colonnes 34 et 35 : If (Target.Column 34 And Target.Column 35) Then Exit Sub 'Mettre ce code au début après vos déclarations dim
Ce commentaire a été minimisé par le modérateur sur le site
[quote]@Cynthia, Si cela est toujours nécessaire, vous devriez pouvoir faire quelque chose comme ça pour vous assurer que le code ne s'exécute que sur des colonnes spécifiques, dans mon cas, les colonnes 34 et 35 : If (Target.Column 34 And Target.Column 35) Puis Exit Sub 'Mettez ce code au début après vos déclarations dimPar Mervyn[/quote] Salut @Mervyn, J'ai complètement perdu la trace du fil, mais merci beaucoup pour vos réponses. J'ai essayé d'appliquer le If (Target.Column 34 And Target.Column 35) Then Exit Sub (ma version lit If (Target.Column4 And Target.Column5) Then Exit Sub comme vous l'avez fourni, mais je reçois un "Run-time erreur '438': L'objet ne prend pas en charge cette propriété ou cette méthode "" erreur sur cette nouvelle ligne. Voici les premières lignes de mon code: Private Sub Worksheet_Change (ByVal Target As Range) Dim xRng As Range Dim xValue1 As String Dim xValue2 As String If (Target.Column4 And Target.Column5) Then Exit Sub If Target.Count > 1 Then Exit Sub On Error Resume Next Ma feuille de calcul n'a que 6 colonnes : Question | Réponse | Catégorie | Sous-catégorie | Balises | Lien photo Je n'ai besoin que de plusieurs listes déroulantes de valeurs dans la sous-catégorie et les balises (colonnes 4 et 5). Je continuerai à chercher des informations comme vous l'avez suggéré le 12/23, et je regarderai le lien fourni par Charity.
Ce commentaire a été minimisé par le modérateur sur le site
Si Target.Column <> 34 Alors Quitter Sub

'Mettre ce code au début après vos déclarations dim
Ce commentaire a été minimisé par le modérateur sur le site
Bonjour, j'utilise actuellement cette formule et toutes les colonnes avec validation des données ont maintenant l'option de sélection multiple, mais je souhaite limiter la sélection multiple à une seule colonne. Quelqu'un peut-il modifier cette formule pour moi afin que la sélection multiple ne puisse être appliquée qu'à Column4 ? Merci :) Private Sub Worksheet_Change(ByVal Target As Range) 'Mise à jour : 2016/4/12 Dim xRng As Range Dim xValue1 As String Dim xValue2 As String If Target.Count > 1 Puis Quittez Sub On Error Resume Next Set xRng = Cells. SpecialCells(xlCellTypeAllValidation) Si xRng n'est rien, alors quittez la sous-application.EnableEvents = False Si ce n'est pas Application.Intersect(Target, xRng) n'est rien alors xValue2 = Target.Value Application.Undo xValue1 = Target.Value Target.Value = xValue2 If xValue1 " " Alors si xValeur2 "" Alors si xValeur1 = xValeur2 Ou _ InStr(1, xValeur1, ", " & xValeur2) Ou _ InStr(1, xValeur1, xValeur2 & ",") Alors Cible.Valeur = xValeur1 Sinon Cible.Valeur = xValue1 & ", " & xValue2 Fin Si Fin Si Fin Si Fin Si Application.EnableEvents = True End Sub Toute aide sera appréciée !
Ce commentaire a été minimisé par le modérateur sur le site
Cela fonctionne bien, mais je ne parviens pas à supprimer un élément une fois sélectionné. Des suggestions au cas où je cliquerais accidentellement sur quelque chose et que je devrais le supprimer sans (espérons-le) effacer toute la cellule et recommencer? De plus, pour ceux qui cherchent à définir une colonne ou des colonnes, Contextures a un excellent ajout au code fourni ici qui vous permet de le faire. http://www.contextures.com/excel-data-validation-multiple.html#column
Ce commentaire a été minimisé par le modérateur sur le site
[quote]Cela fonctionne bien, mais je ne parviens pas à supprimer un élément une fois sélectionné. Des suggestions au cas où je cliquerais accidentellement sur quelque chose et que je devrais le supprimer sans (espérons-le) effacer toute la cellule et recommencer? De plus, pour ceux qui cherchent à définir une colonne ou des colonnes, Contextures a un excellent ajout au code fourni ici qui vous permet de le faire. http://www.contextures.com/excel-data-validation-multiple.html#columnPar charité[/quote] Le code fonctionne bien. Cependant, je n'arrive pas à désélectionner un élément. Lorsque je veux supprimer un élément de la sélection, il n'est tout simplement pas supprimé. Quelqu'un d'autre a-t-il également rencontré ce problème ?[/quote] Salut à tous, Toutes les solutions trouvées pour ce problème... veuillez partager...
Ce commentaire a été minimisé par le modérateur sur le site
Salut, Code fonctionne bien. Cependant, je n'arrive pas à désélectionner un élément. Lorsque je veux supprimer un élément de la sélection, il n'est tout simplement pas supprimé. Est-ce que quelqu'un d'autre rencontre ce problème aussi?
Ce commentaire a été minimisé par le modérateur sur le site
Y a-t-il eu une réponse à ce problème. C'est le même problème que j'ai. Il ne semble pas y avoir de moyen de supprimer un élément qui a été sélectionné.
Ce commentaire a été minimisé par le modérateur sur le site
supprimez le contenu de la cellule, puis resélectionnez
Ce commentaire a été minimisé par le modérateur sur le site
Salut à tous, j'ai ce code sur une feuille Excel et il nettoie le contenu de la liste déroulante lorsque la cellule est sélectionnée - je sais quelle partie du code le fait (la partie qui dit 'fillRng.ClearContents') et je J'ai essayé d'utiliser certains des éléments ci-dessus pour le réparer sans succès ... Je suis nouveau dans la programmation VBA, etc. dupliqué svp ?? Option Explicit Dim fillRng As Range Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim Qualifiers As MSForms.ListBox Dim LBobj As OLEObject Dim i As Long Set LBobj = Me.OLEObjects("ListBox1") Set Qualifiers = LBobj.Object If Target.Row > 3 Et Target.Column = 3 Alors Set fillRng = Target With LBobj .Left = fillRng.Left .Top = fillRng.Top .Width = fillRng.Width .Height = 155 .Visible = True End With Else LBobj.Visible = False If Non fillRng Is Nothing Then fillRng.ClearContents With Qualifiers If .ListCount 0 Then For i = 0 To .ListCount - 1 If fillRng.Value = "" Then If .Selected(i) Then fillRng.Value = .List(i) Else If .Selected(i) Then fillRng.Value = _ fillRng.Value & ", " & .List(i) End If Next End If For i = 0 To .ListCount - 1 .Selected(i) = False Next End With Set fillRng = Rien Fin Si Fin Si Fin Sub
Ce commentaire a été minimisé par le modérateur sur le site
Salut à tous, je pourrais parfaitement faire ma liste déroulante, mais ma question est la suivante : lorsque je sélectionne tous les éléments nécessaires, ils se succèdent de manière horizontale dans la cellule, par exemple : jaune, vert, noir, rouge. Mais comment puis-je le faire apparaître de manière verticale ?, plutôt comme par exemple : Orange blanck jaune Rouge Parce qu'en horizontal, la cellule devient assez longue lors de la sélection de nombreux éléments. Pourriez-vous s'il vous plaît me dire s'il y a un moyen de le faire?. Merci, Désirée
Ce commentaire a été minimisé par le modérateur sur le site
J'ai réussi à utiliser ce code et à créer avec succès plusieurs listes déroulantes de sélection. Cela a fonctionné lorsque j'ai fermé et rouvert à des jours différents. Cependant, toutes les cellules que j'ai initialement sélectionnées n'autorisent pas la sélection multiple. Seuls ceux effectués précédemment, malgré l'utilisation du code pour l'ensemble de la feuille de calcul. Pouvez-vous aider ?
Ce commentaire a été minimisé par le modérateur sur le site
J'ai le même problème.
Ce commentaire a été minimisé par le modérateur sur le site
les cellules sont très probablement verrouillées, faites un clic droit sur chacune d'elles, allez dans formater les cellules, protection, puis décochez l'option de cellule verrouillée
Ce commentaire a été minimisé par le modérateur sur le site
J'ai créé une liste déroulante dans laquelle plusieurs sélections de texte peuvent être choisies, telles que « nutrition », « poids » et « travail » pour la raison pour laquelle chaque appelant appelle. J'ai une page de résumé où je veux voir combien de chaque raison ont été indiqués dans un mois particulier. Quelle formule utiliserais-je pour dire à Excel de retirer et de comptabiliser chacun de ces éléments séparément au cours d'un mois donné ? Actuellement, de la façon dont je l'ai configuré, il ne correspond correctement que si j'ai une raison dans la cellule pour chaque appelant.
Ce commentaire a été minimisé par le modérateur sur le site
Good Day,
Désolé, je ne peux pas vous aider à résoudre ce problème. Merci de me dire si vous trouvez la réponse.
Ce commentaire a été minimisé par le modérateur sur le site
J'essaie de créer 4 colonnes avec des listes déroulantes où je peux sélectionner plusieurs valeurs. Comment modifier le code VBA "liste déroulante avec plusieurs sélections" de sorte que lorsque je clique sur une valeur déjà saisie, elle la supprime de la cellule ? Merci en avance.
Ce commentaire a été minimisé par le modérateur sur le site
Cher Randy,
Que voulez-vous dire par "lorsque je clique sur une valeur qui a déjà été saisie, cela la supprime de la cellule ?"
Ce commentaire a été minimisé par le modérateur sur le site
J'ai la même question. Ma liste déroulante ne se souvient pas des valeurs sélectionnées. Si quelqu'un clique sur une cellule qui a déjà été remplie (pas par lui, mais par quelqu'un d'autre), les valeurs sélectionnées sont effacées et la cellule redevient vide.
Ce commentaire a été minimisé par le modérateur sur le site
J'utilise le code ci-dessous pour autoriser la sélection multiple sur plusieurs feuilles de calcul, mais lorsque je passe à une autre feuille de calcul du classeur, la sélection multiple disparaît. Lorsque j'enregistre le fichier et que je reviens, il fonctionnera pour un onglet avec le code, mais encore une fois lorsque je clique sur un autre onglet avec le code, cela ne fonctionne plus. Une idée de comment résoudre ce problème, donc si je clique sur une feuille de calcul avec le code VBA, la sélection multiple sera toujours autorisée?
Ce commentaire a été minimisé par le modérateur sur le site
Salut, ich bin total VBA Laie. Ich versuche den Code so zu modifizieren, dass
a) die Mehrfachauswahl nicht in allen, sondern nur ein zwei Spalten aktiv ist
b) ich Items auch wieder rausnehmen kann, zB in dem ich in der Listenauswahl das Item noch einmal anklicke (Beispiel : ich habe über die Mehrfachauswahl ausgewählt : A, D, X, Y... nun fällt mir auf, dass D nicht dazu gehört. Beim aktuellen Code müsste ich Eingaben entfernen und neu auswählen).
Merci d'avance!
Ce commentaire a été minimisé par le modérateur sur le site
Je ne peux pas procéder à la création de la sélection multiple de la liste déroulante. J'ai écouté le didacticiel et lu du matériel, mais je n'arrive toujours pas à créer. Est-ce que quelqu'un peut m'aider?
Ce commentaire a été minimisé par le modérateur sur le site
Je sais que cela peut être totalement aléatoire, mais j'utilise une variante du VBA sans problème. Sauf sur une page, si vous sélectionnez les trois premières options, il ne vous laissera pas sélectionner la quatrième. Il vous permettra de sélectionner la 5e, la 6e, etc., mais pas la 4e option. Pensées?
Ce commentaire a été minimisé par le modérateur sur le site
Salut Robert,
J'ai testé le code mais je n'ai pas trouvé le problème comme vous l'avez mentionné. Pouvez-vous me dire quelle version d'Excel utilisez-vous ? Merci pour votre commentaire.
Il n'y a pas encore de commentaires postés ici
TÉLÉCHARGER PLUS
Laisser vos commentaires
Publier en tant qu'invité
×
Évaluez cet article:
0   Personnages
Emplacements suggérés