Bonjour,
j'aimerais mettre une évênement sur simple clic dans une listbox qui en mettrait une autre à jour :
par exemple je clique sur une entrée dans ma listbox 1 et la listbox 2 se met à jour. Le problème c'est que mon code ne reconnait pas la sélection sur simple clic, je suis obligé de mettre un double clic pour que ca fonctionne. Auriez vous des pistes ?
Mon code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Dim sql As String, id_demand As String For Each ver In Form_F_qualif_0.L_Demand.ItemsSelected id_demand = CInt(Form_F_qualif_0.L_Demand.ItemData(ver)) Next ver sql = "SELECT T_Mails.SUJET as sujet, T_Mails.SENDER as sender, T_Mails.id_outlook as id_outlook from T_Mails " sql = sql & " where ID_Demande = " & id_demand & ";" Form_F_qualif_0.L_mails_demande.RowSource = sql Form_F_qualif_0.L_mails_demande.Requery
Partager