Discussion :

[bellemeche]

*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*

[LedZeppII]

Bonjour,

On ne peut pas mettre un point-virgule entre Form et Recordset.
Autrement ça signifie "contrôle dont le nom est Recordset", parce que Controls (collection) est le membre par défaut de Form.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Set rst = Forms![f_liste commande]![recherche].Form.Recordset

A+