Supportnet Computer
Planet of Tech

Supportnet / Forum / Datenbanken

Access Unterformular filtern





Frage

Hallo zusammen! Ich versuche nun schon seit 2 Tagen ein Unterformular zu filtern.Zu meinem Problem: Ich habe ein Formular in dem ich über zwei Kombofelder eine Auswahl von einem bestimmten Gerät (Switch).Nun wird über folgenden Code: [code]Private Sub Suchfeld2_AfterUpdate() ´ Den mit dem Steuerelement übereinstimmenden Datensatz suchen. Dim rs As Object Set rs = Me.Recordset.Clone rs.FindFirst "[GID] = " & Me.Suchfeld2.Column(0) If Not rs.EOF Then Me.Bookmark = rs.Bookmark End Sub[/code] das Unterformular (DAS AUF EINER ABFRAGE BASIERT!!!) angezeigt.Das Unterformular zeigt mir nun alle Ports des Switches mit den angeschlossenen PCs und IP usw.Leider gibt es jetzt dort doppelte Einträge, weil die Ports zweimal täglich abgefragt werden.Es gibt allerdiings noch ein Datumsfeld hinter jedem Port das mir das Datum anzeigt wann der Port eingetragen wurde.Nun habe ich im Haupformular ein Kombofeld erstellt das alle Datums (???) des Unterformulars enthält.Ich hätte gerne dass nach der Auswahl eines Datums nur die Einträge mit dem selben Datum im Unterformular angezeigt werden.Dies wollte ich über einen Filter realisieren: [code]Private Sub Datum_AfterUpdate() Dim subForm As Form Dim filtercriteria As String Set subForm = Me.HubSwitchDetail.Form filtercriteria = "Datum =´" & Me.Datum.Value & "´" subForm.Filter = filtercriteria subForm.FilterOn = True End Sub[/code] Leider funktioniert das so nicht.Ich bekomme immer eine Fehlermeldung "Laufzeitfehler: 2001: Sie haben die vorherige Operation abgebrochen!". Danke im voraus. Gruß Seba

Antwort 1 von RalfH

Hallo,
Zitat:
Private Sub Datum_AfterUpdate()

Ist glaube ich, nicht so gut dafür.
Gruß Ralf