*Bonjour*

J'ai le code suivant qui me permet d'imprimer un état précis à l'aide d'un bouton imprimer. J'aimerais à l'aide d'un autre bouton imprimer la liste des codes dans le sous-formulaire. J'ai donc fait dans le deuxième code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Dim stDocName As StringDim stLinkCriteria As String    stDocName = "commande"
    stLinkCriteria = "[Numero cde]=Forms![f_liste commande]![recherche]![Numero cde]"
 
    DoCmd.OpenReport stDocName, acViewPreview, , stLinkCriteria
J'ai donc fait dans le deuxième code mais j'ai le message suivant : erreur 2465 ne trouve pas le champ recordset.... Comment définir mon recordset basé sur ce sous-formulaire

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
Dim db As DAO.DatabaseDim rst As DAO.RecordsetDim stDocName As String
stDocName = "commande"
 
Set db = CurrentDb()
Set rst = Forms![f_liste commande]![recherche].Form!Recordset
 
 
If Not rst.EOF Then
  rst.MoveFirst
  While Not rst.EOF
     ' code
     DoCmd.OpenReport stDocName, acViewNormal
     rst.MoveNext
  Wend
 
rst.Close
End If
*Merci*