Menu

Erreur 13 imcompatibilité de type Access 2016

Messages postés
2
Date d'inscription
dimanche 7 avril 2019
Statut
Membre
Dernière intervention
9 avril 2019
- - Dernière réponse : Loann181
Messages postés
2
Date d'inscription
dimanche 7 avril 2019
Statut
Membre
Dernière intervention
9 avril 2019
- 9 avril 2019 à 00:09
Bonjour,

J'ai un problème d'erreur 13 imcompatibilité dans mon programme VBA dans access 2016. Je n'arrive pas à trouver la sour du problème. Le débluggeur m'indique que ça serait dans la zone en gras.

Option Compare Database

Private Sub liste_ref_Change()
Dim ligne As Recordset: Dim base As Database

Set base = Application.CurrentDb
Set ligne = base.OpenRecordset("SELECT Designation, Quantite FROM Catalogue WHERE code_article='" & liste_ref.Value & "'", dbOpenDynaset)

End Sub

Merci en avance de votre aide !
Afficher la suite 

Votre réponse

1 réponse

Messages postés
14235
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
22 avril 2019
1330
0
Merci
Bonjour,
Avez-vous passe le curseur souris sur les différentes variables pour voir leur affectations?
Loann181
Messages postés
2
Date d'inscription
dimanche 7 avril 2019
Statut
Membre
Dernière intervention
9 avril 2019
-
Oui ! Il y a juste la réponse de dbOpenDynaset qui me donne 2 que je ne suis pas sur. Pour les reste me donne la bonne valeur.
Commenter la réponse de f894009