Discussion :

[modus57]

Bonjour

Après de multiples recherches, je ne trouve pas la solution, voilà le problème.

Dans un formulaire qui contient 2 Listbox, si c'est des Listbox à sélection simple (donc, sans sélection multiple) un simple MaListe=Null suffit pour désélectionner l'élément sélectionné dans la Listbox précédemment utilisée.

Par contre si les 2 Listbox sont à sélection multiple, lorsque je passe d'une Listbox à l'autre, l'élément ou les éléments sélectionnés dans la Listbox précédemment utilisée restent sélectionnés en surbrillance dans la liste.

Comment désélectionner l'élément ou les éléments sélectionnés ou supprimer la surbrillance dans la Listbox précédemment utilisée lorsque j'en sélectionne un ou plusieurs dans l'autre Listbox .

Merci d'avance pour aide

[joe.levrai]

Bonjour,

dans le cadre d'un listbox à multiselection, il faut parcourir la collection des éléments et les déselectionner

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub CommandButton1_Click()
    With Me.ListBox1
        For i = 1 To .ListCount
           .Selected(i - 1) = False
        Next i
    End With
End Sub

[patricktoulon]

salut joe
il y a beaucoup plus simple
réinitialiser la listbox par la listbox

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub CommandButton1_Click()
ListBox1.List = ListBox1.List
End Sub

voila

[joe.levrai]

Yes tu as raison

En fait, à mes torts exclusifs, je pensais deviner un non-dit potentiel dans son explication : une possibilité d'ajouter par la suite un "transfert" d'une liste à l'autre, qui nécessite là d'identifier les éléments sélectionnés.

d'où la présentation de Selected(x)

mais à froid, en relisant, je crois que j'ai vu trop loin pour rien

[patricktoulon]

re
c'est pas un tord il a une vision globale des possibilités maintenant

1. aperçu de méthode (transfert)
2. désélection de tous

[modus57]

Bonjour et merci à vous.

Ça fonctionne avec les 2 solutions, celle de Patrick est plus simple et comporte qu'une ligne de code.

Bravo pour votre réactivité

Ma réponse s'est entre croisée, je prends note de la réponse de joe si besoin de transfert.

[modus57]

Bonsoir.

Je n'ai pas résolu mon problème, en effet avec un CommandButton1_Click pas de soucis.

Par contre ça ne fonctionne pas dans un ListBox1_Click en multi sélection ?

Ce que je veux faire :
- Désélectionner l'élément ou les éléments sélectionnés dans la ListBox1 (MultiSelect = fmMultiSelectMulti) lorsque je clicque dans la ListBox2 (MultiSelect = fmMultiSelectMulti) pour sélectionner un plusieurs ou plusieurs éléments.

Existe-t-il une solution ?

[joe.levrai]

tu peux nous montrer toutes ces procédures ?

je devine peut-être le problème, mais en VBA on ne devine pas, on analyse et on démontre

[patricktoulon]

re
je crois qu'on l'a perdu Joe entre 2 item

[joe.levrai]

J'ai toute confiance en Patrick (qui a osé rigoler ? )

De mon côté, je ne suis pas en mesure de continuer sans l'élément demandé

tu peux nous montrer toutes ces procédures ?

la question est de vider une sélection dans un ListBox, via l'évènement d'un autre contrôle (lui-même un ListBox)
du coup, la question étant assez ciblée et généraliste, le fichier ne sert à rien, les procédures contenues dans ton Userform vont suffire amplement à voir où est ton problème (mauvais évènement, mauvaise méthode, mauvais contrôle sur lequel on utilise l'évènement etc...), il suffit de les copier dans un message