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

Problème liste intuitive cascade niveaux avec formulaire

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 !

sebcane

XLDnaute Nouveau
Bonjour,
est il possible dans ce genre de formulaire d'avoir une valeur dans la textbox qui prendrait en compte les conditions des combobox (exemple: CP+Ville dans ce fichier)? et non pas juste une condition (ville dans ce fichier)

DVConditionSaisieIntuitiveFormCascade2Choix.xls

Cela serait parfait car ça m'éviterait d'utiliser une formule matricielle:
Code:
=INDEX(ZSD!$M$2:$M$10000;EQUIV(1;($B$4=ZSD!$A$2:$A$10000)*($C$4=ZSD!$E$2:$E$10000);0))

merci d'avance
 
Re : Problème liste intuitive cascade niveaux avec formulaire

Bonsoir.

Oui, et ça se fait très facilement avec un objet que j'ai créé: ComboBoxLiés

Edit: Cependant il y a quelques lenteurs vu le nombre de communes.
Qu'est-ce qui ne va pas au juste dans ce classeur par rapport à ce que vous voudriez ?
 
Dernière édition:
Re : Problème liste intuitive cascade niveaux avec formulaire

Bonjour,

cf pj

Remplacer

Code:
   tmp = Application.Match(Me.ComboBox2, [ville], 0)
   Me.TextBox1 = Range("cp")(tmp)

par

Code:
   tmp1 = Me.ComboBox1: tmp2 = Me.ComboBox2
   For p = 1 To UBound(a)
     If b(p, 1) = tmp1 And a(p, 1) = tmp2 Then Me.TextBox1 = Range("cp")(p)
   Next p

Temps: 0,06 sec pour 38.000 communes

JB
 

Pièces jointes

Dernière édition:
- 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

Réponses
5
Affichages
402
Réponses
3
Affichages
899
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…