---Soumis par Andy Baron---
Utiliser un recordset comme datasource d'un état.
Le recordset possède une propriété rarement utilisée, Name, qui retourne la table, la requête ou l'énoncé SQL qui fut utilisé pour l'ouvrir. C'est exactement ce qui est requis pour assigner la propriété recordsource.
Dans la procédure événementielle Open d'un état:
Private Sub Report_Open(Cancel As Integer) Me.RecordSource = grst.Name End Sub
Dans un module standard:
'Code Courtesy of 'Andy Baron ' Public grst As Recordset Public Sub testreport() Set grst = CurrentDb.OpenRecordset( _ "Select * from tblTest1 where longfield=4") DoCmd.OpenReport "rptTest1", acViewPreview grst.Close Set grst = Nothing End Sub