Bonjour,
j'ai le code suivant qui me permet de parcourir un état précis le code ci dessous plante ici :et me renvoie l'erreur: 2465. Comment définir mon recordset basé sur ce report?
Code : Sélectionner tout - Visualiser dans une fenêtre à part strSQL = Reports("MyReport").RowSource
Merci
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 Private Sub Report_Open(Cancel As Integer) Dim strSQL As String Dim rsData, rst As DAO.Recordset strSQL = Reports("MyReport").Recordset Set rst = CurrentDb.OpenRecordset(strSQL, CurrentProject.Connection, adOpenKeyset) Do While rst.EOF = False Debug.Print rst.Fields(1).Name rsData.MoveNext Loop
Partager