Bonjour à tous, voila mon petit souci.
Access 2003
J'ai un état basé sur un formulaire (Etat.code = Formulaire.code) qui lui ai basé sur une requête retournant plusieurs enregistrement. Je souhaite que pour chaque enregistrement, l'etat se lance, s'imprime et se ferme (ou s'imprime directement).
Je suis donc passé par un code vb qui parcours les enregistrement, le parcours marche (puisque les msgbox fonctionnent), mais il ne m'imprime que le premier enregistrement jusqu'au EOF.
Voila mon code :
sur activation du formulaire :
Peut etre le souci viendrait de l'emplacement de ce code
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Dim db As Database Dim rs As Recordset Set db = CurrentDb Set rs = db.OpenRecordset("R_test") rs.MoveFirst While Not rs.EOF MsgBox rs("code_rep") DoCmd.OpenReport "Etat", acViewNormal, , " [Code_rep] = " & rs("Code_rep") rs.MoveNext Wend rs.Close
Si vous voyer quelque chose, merci d'avance !
Partager