bonjour

j'ai actuellement un problème lors de l'execution d'une requete de
selection programmée en VB et je souhaiterai volontier un peu d'aide. je vous remercie d'avance.

je vous expose la situation:
dans un formulaire access j'ai une zone de liste déroulante ou je choisi le code d'une céréale. j'aimerai récupéré la quantité total livree de cette cereale se trouvant dans une table afin d'eviter a l'utilisateur de dépasser cette limite. mais j'ai malheureusement un probleme lors de l'execution de la requete.

voici la requete:
Private Sub code_cereale_vente_Change()
Dim req As String
Dim base As Database
Dim enreg As Variant
Dim qte As String

Set base = CurrentDb
req = "SELECT sum(livrer.quantite_livree)as qte_stock FROM livrer " _
& "WHERE livrer.code_cereale_livrer = " _
& "('" & Forms![saisie_vente]![code_cereale_vente] & "');"
(*) Set enreg = base.OpenRecordset(req)
With enreg
.MoveLast
qte = enreg![qte_stock]'
End With
qte_dispo.Value = Str(qte)
End Sub

(*) une erreur se produit a cette endroit:

erreur d'execution 3464
type de données incompatible dans l'expression du critère

dsolé pour la longueur et encore merci de votre aide.