J'ai un code qui me permets d'effectuer une action (ajouter dans une table) par sélection d'un produit dans une liste déroulante (double click).
comment faire pour transposer ce code afin d'utiliser la touche "ENTER" à la place du double click ?
merci pour votre aide
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Private Sub Liste2_DblClick(cancel As Integer) Dim Rs As DAO.Recordset Set Rs = CurrentDb.OpenRecordset("Commande", dbOpenTable) Rs.AddNew Rs.Fields(0) = Me.Liste2 Rs.Update Rs.Close Set Rs = Nothing End Sub
Partager