Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

liste déroulante double dans une même cellule

  • Initiateur de la discussion Initiateur de la discussion nightswan
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

nightswan

XLDnaute Junior
Bonjour,

J'ai fait des recherches sur le sujet (déroulante en cascade) mais je n'ai pas trouvé ce qui me convient.

Pour exposer le problème : j'ai besoin de créer une première liste déroulante (en A1 par exemple) avec les 26 lettres de l'alphabet, et une fois cette saisie validée, seuls les noms commençant par "A", "B"... seraient dans la liste, MAIS dans une même cellule.

J'ai déjà vu ça dans un fichier Excel, mais je ne l'ai pas retrouvé et tous les sujets sur cette problématique intègrent des macros assez complexes ou impliquent 2 cellules (une première déroulante en A1, et une seconde en A2 fonction du contenu de A1).

Faut-il absolument passer par des macros ou y-a-t-il une fonction de base Excel à exploiter ? Merci pour vos lumières.
 

Pièces jointes

Re : liste déroulante double dans une même cellule

Il y a ça qui n'est pas trop compliqué :
VB:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Rang As Long
If Target.Count <> 1 Then Exit Sub
If Target.Value <> "" Then Rang = Asc(UCase(Target.Value)) - 64
If Rang < 1 Or Rang > 26 Then Rang = 27
ThisWorkbook.Names.Add "Rang1èreL", "=" & Rang
End Sub
Deux noms dynamiques:
Code:
LstNom1èreL =INDEX(Feuil1!$A$20:$AA$65536;;Rang1èreL)
LstValidNom =DECALER(LstNom1èreL;;;NBVAL(LstNom1èreL))
Des validations là où il faut: autoriser Liste =LstValidNom
Enfin en AA20:
Code:
=CAR(LIGNE()+45)
propagé jusqu'à AA46

À +
 
Re : liste déroulante double dans une même cellule

Voilà.
Que ça ne vous empêche pas d'essayer de le mettre en place de votre coté avant de voir mon corrigé si vous n'y arrivez pas.
Pourra peut être nécessiter une mise au point plus poussée.
À +
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…