Bonjour à tous
De nouveau besoin d'aide
Jai une requete parametée que j'ouvre en vba.
Le paramètre est dans la requete est [choix] sur le champ DOSSRefIntLalux
Mon code ci dessous semble ouvrir la requête mais impossible de lire un champ.
Toute aide est la bienvenue.
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
Dim db As DAO.Database
Dim qdf As DAO.QueryDef
Dim qdf2 As DAO.QueryDef
Dim rst As DAO.Recordset
Dim rst2 As DAO.Recordset
 
Dim RefDossier As String
 
'Instancie la base de données
Set db = CurrentDb
 RefDossier = Me.lstNoDossier.Column(0, i)
 
    Set qdf2 = db.QueryDefs("ReqLaluxFormDupl2")
    qdf2.Parameters("choix") = RefDossier & " * "
 
    Set rst2 = qdf2.OpenRecordset(dbOpenDynaset)
    rst2.MoveFirst
    Debug.print rst2.Fields("Montant_htva").Value
Je ne comprends pas pq cela ne fonctionne pas. Comme s'il n'y avait pas d'enregistrement dans le recordset.
Pourtant, qd j'exécute la requete, elle trouve 2 enregistrements.