Reportes Diarios

Creo que te he pillado la idea:
1- Primero debes crear una tabla para registrar la fecha cada vez que se imprime el informe. La tabla la llamaremos "Fechas Informes" i tendrá un campo tipo fecha/hora que lo llamaremos "Fecha Impresión".
2- En un evento al abrir el formulario inicial pondremos el siguiente código:
Dim dbs As Database
Dim rst As Recordset
Set dbs = CurrentDb()
Set rst = dbs.OpenRecordset("Fechas Informes")
If DCount("*", "Fechas Informes") > 0 Then
rst.MoveLast
If rst("Fecha Impresión") <> Date Then
rst.AddNew
rst("Fecha Impresión") = Date
rst.Update
DoCmd.OpenReport "informe", acNormal
End If
Else
rst.AddNew
rst("Fecha Impresión") = Date
rst.Update
DoCmd.OpenReport "informe", acNormal
End If