Discussion :

[Lalla lbatoul]

Bonjour tout le monde,

Alors je reviens avec un nouveau problème en espérant que quelqu'un aura la gentillesse de m'aider.

J'ai deux ListBox: ListBox1 est allimentée par une table et ListBox2 est Vide.

Dans un premier temps je vaudrais pouvoir selectionner un element dans la ListBox1 ,et en cliquant sur un bouton "add",l'ajouter dans la ListBox2 (en le supprimant de la première ).

Ensuite (si le premier point fonctionne biensur) je voudrais pouvoir selectionner deux ou trois éléments à la fois de la première liste et les ajouter dans la deuxieme.

Voici le code que j'ai mis pour l'instant et qui ne marche pas ( bien evidemment )

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub add_secteur_Click()
'add_secteur est mon bouton "add"
 
Dim Val As String
'je recupère la valeur selectionnée dans la 1ère liste
 
Val = list_secteur.Value
 
If list_secteur.Value = True Then
 
'je la transmets dans la deuxieme
list_checked_secteur.RowSource = list_secteur.Value
 
End If
 
End Sub

Voila je compte sur votre aide

[LedZeppII]

Bonjour,

Il y a un exemple dans les Sources : Permutez des éléments entre deux zones deux listes de type "Table/Requête"

A+