Listbox vases communicants

  • Initiateur de la discussion Initiateur de la discussion 2susy
  • 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 !

2susy

XLDnaute Junior
bonjour à tous et notamment aux amis des macros !

j'ai deux listbox
je fais passer des item de l'une à l'autre sur le principe des vases communicants.

mais j'alimente la listbox1 par combobox à plusieurs reprises.
Je souhaiterai rendre impossible les doublons entre les deux listbox.
si un item se trouve déjà dans listbox2, il doit être impossible d'ajouter le même item dans listbox1 via combobox.

J'espère que ma demande est assez explicite, merci à ceux qui se pencheront dessus !!
Susy
 
Re : Listbox vases communicants

Bonjour

Une solution consiste à balayer la listbox pour vérifier si la valeur existe
Code:
dim trouve as boolean
trouve = false

For i = 0 To ListBox1.ListCount - 1
       if ListBox1.List(i) = combobox1.value then
       trouve = true
       exit for
       end if
Next i

If trouve = false then
' on ajoute la valeur

end if
A modifier
A tester

JP
 
Re : Listbox vases communicants

merci à tous les deux,
skoobi voici en pj un fichier (ne pas se moquer de mon code, je débute)

jp14 : j'ai déjà un moyen d'empêcher les doublons dans une seule listbox...mais ce n'est pas suffisant !!

merci encore!
bonne fin d'aprem,

Susy
 

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

Réponses
1
Affichages
1 K
Réponses
7
Affichages
1 K
Retour