Bonjour, J'ai crée une listbox avec la propriété 'sélection multiple' à simple.
Elle fonctionne bien mais lorsque je click sur 'Enregistrer', toutes
les valeurs ne s'enregistrent pas.
Par exemple si je sélectionne une valeur X et une autre Y, il
enregistre que l'une des deux.
Je ne sait pas comment gérer ça.

Voici mon code

Merci d'avance

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
17
18
19
Private Sub Enr_Click()
On Error GoTo Erreur
rst.MoveLast
rst.AddNew
rst.Fields("Num_tireur") = tireur_D.Column(0)
rst.Fields("NUM_ETANG") = etang_D.Column(0)
rst.Fields("DATED") = Date_D
rst.Update
[Form_Demande]!DEMANDER.Visible = True
[Form_Demande]!DEMANDER.Requery
[Form_Demande]!autre_demande.Visible = True
 
Exit_Enr_Click:
    Exit Sub
 
Erreur:
    MsgBox Err.Description
    Resume Exit_Enr_Click
End Sub