Forum Discussion
Access 2016 Filter von Unterbericht setzen
Hallo Community,
ich will in Access 2016 im Hauptbericht einen Filter auf einen Unterbericht definieren. Mein VBA code ist:
Private Sub Report_Load()
Dim r As Report
Dim Str As String
Str = "[TagZeit] > " & Now() - 100
Debug.Print Str
Me.[rpt_Climate01].[Report].[Filter] = Str ' ==> Das funktioniert nicht, Error 2101
Me.[rpt_Climate01].[Report].[FilterOn] = True
Set r = Me.rpt_Climate01.Report
r.Filter = Str ' ==> Das funktioniert auch nicht, Error 2101
r.FilterOn = True
End Sub
Debug.Print str ==> [TagZeit] > 02/08/2022 17:15:39
Der Code steht im Load Ereignis des Hauptberichts. Ich habe schon alles Mögliche probiert, ohne Erfolg.
Kann mir jemand auf die Sprünge helfen? Ich benutze diese Methode erfolgreich bei Formularen, beim Report beiße ich mir die Zähne aus.
Gruss und Dank für Antworten.
Peter
- Entschuldigung, aber ich habe einen Fehler gemacht. Es sollte sein:
Str = "[TagZeit] > #" & Now() - 100 & "#"
- Versuchen Sie es auf diese Weise: Str = #"[TagZeit] > " & Now() - 100 & "#"
- Entschuldigung, aber ich habe einen Fehler gemacht. Es sollte sein:
Str = "[TagZeit] > #" & Now() - 100 & "#"- Danke für Ihre Info aber jetzt erhalte ich die Fehlermeldung: 2455, --- invalid reference to the property Form/Report
what is:Dim Str As Thong
do you mean:
Dim Str As StringStr = "[DayTime] > #" & Format$(Now() - 100, "mm/dd/yyyy hh:nn:ss") & "#"
