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

Probleme d'alimenter une liste box

  • Initiateur de la discussion Initiateur de la discussion zine pef
  • 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 !

zine pef

XLDnaute Occasionnel
Salut tt,ts le forum
dans mon fichier j'ai 1userform ,2 combobox,1listebox
je choisie l'année du combo1
et puit la classe du combo2 pour aliment listebox
la vient le probleme dans liste s'affiche tout les noms qui se trouve dans tout les année;
je souhaite ds la liste affiche les noms de la classe choisie par l'année

merci
 

Pièces jointes

Re : Probleme d'alimenter une liste box

Salut Zine Pef,

je n'ai pas complétement régler ton problème mais j'ai réussi à faire afficher dans ta listbox les éléments que tu voulais. Pour y arriver j'ai du remplir la colonne A avec toutes les années. Maintenant le problème c que je n'arrive pas à enlever les doublons qui se sont créés dans ton combobox1... 😡

J'ai regardé le code sur le site de jacques Boisgontier Formation Excel VBA JB mais je pense qu'il est tard et que je n'ai plus les yeux en face des trous...😛

J'essayerai demain promis.

Bonne nuit

PEPE
 

Pièces jointes

Re : Probleme d'alimenter une liste box

Pour info j'ai changé la ligne de code dans le combobox2_change :

If C.Text = ComboBox2 And C.Offset(, -4) = ComboBox1.Value Then

Il fallait lui donner une information supplémentaire pour qu'il affiche les bonnes infos dans ta listbox.

PEPE
 
Re : Probleme d'alimenter une liste box

Merci PEPE pour la modification
mais mon fichier principal j'utilise l'année sans doublant
si possible modifier le code pour les doublant

j'ai trouver le code :
'ajout des années manquantes
For i = 4 To Range("c65535").End(xlUp).Row
If Cells(i, 1).Value = "" Then
Cells(i, 1).Value = Cells(i - 1, 1).Value
End If

' effacer les années ajoutées
For i = Range("A65535").End(xlUp).Row To 2 Step -1
If Cells(i, 1).Value = Cells(i - 1, 1).Value Then
Cells(i, 1).Value = ""
End If
Next i
mais le probleme j' ne sait pas ou je place ce code
SVP un petit aide
 
Re : Probleme d'alimenter une liste box

Bonsoir ZinePef,

Malheureusement le code qui sert à alimenter la listbox (souhait original) utilise les 2 colonnes année et classe. Il faut impérativement remplir les cellules de la colonne année pour que ce code fonctionne. Si tu ne veux pas la remplir alors je ne serai pas en mesure de te fournir un code qui remplit la listbox.

Concernant les codes du dernier post, Ils n'ont pas de rapport avec les combobox...😕

Bonne soirée

PEPE
 
- 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

N
  • Question Question
Réponses
15
Affichages
9 K
C
Réponses
4
Affichages
2 K
C
Z
Réponses
4
Affichages
1 K
ZeIeph
Z
B
Réponses
2
Affichages
905
B
G
Réponses
3
Affichages
2 K
Galaktus
G
  • Question Question
Réponses
0
Affichages
667
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…