Filter auf Unterformular setzen und anwenden

[Joachim]

Hallo,
ich habe ein Hauptformular (frmHaupt) mit einem Feld <txtFeld1> und ein
Unterformular (sfrmUnter), das Datensätze aus einer Abfrage
(qryAbfrage1) als Datenblatt darstellt.
Jetzt will ich das Unterformular nach dem Feld <ID> filtern. Wenn also
im Hauptformular der Wert "4" in txtFeld1 steht, sollen alle
Datensätze mit ID=4 im Unterformular angezeigt werden.
Ich will bei jedem Datensatzwechsel im Hauptformular das Unterformular
entsprechend filtern. Etwa so:

Private Sub Form_Current()
'Setze Filter ID = Me.txtFeld1
' Wende Filter an
End sub

Die Syntax
Form_sfrmUnter.Filter = "ID = ' " & Me.txtFeld1 & "'" " führt
zwar zu keinem Fehler, aber es funktioniert nicht.
Wie muss ich in VBA die Filterbedingung korrekt formulieren?
Über
Forms![frmHaupt].sfrmUnter.Form. .... Filter = ... ?
Ich kriegs irgendwie nicht hin.
Danke für die Hilfe
Grüße
Joachim

[Jürgen Volke]

Hallo Joachim

Post by Joachim
ich habe ein Hauptformular (frmHaupt) mit einem Feld <txtFeld1> und
ein Unterformular (sfrmUnter), das Datensätze aus einer Abfrage
(qryAbfrage1) als Datenblatt darstellt.
Jetzt will ich das Unterformular nach dem Feld <ID> filtern. Wenn also
im Hauptformular der Wert "4" in txtFeld1 steht, sollen alle
Datensätze mit ID=4 im Unterformular angezeigt werden.
Ich will bei jedem Datensatzwechsel im Hauptformular das Unterformular

wieso willst du da überhaupt filtern?
benutzt doch die LinkChildFields + LinkMasterFields-Eigenschaften
dann macht Access das automatisch für dich

HTH Jürgen

[Peter Doering]

Hallo,

Post by Joachim
ich habe ein Hauptformular (frmHaupt) mit einem Feld <txtFeld1> und ein
Unterformular (sfrmUnter), das Datensätze aus einer Abfrage
(qryAbfrage1) als Datenblatt darstellt.
Jetzt will ich das Unterformular nach dem Feld <ID> filtern. Wenn also
im Hauptformular der Wert "4" in txtFeld1 steht, sollen alle
Datensätze mit ID=4 im Unterformular angezeigt werden.
Ich will bei jedem Datensatzwechsel im Hauptformular das Unterformular
[...]

Vergiss deinen Code, den braucht's nicht. Du musst nur in den Eigenschaften
des UFo-Steuerelement im Hauptformular, Tab Daten die Felder Verknuepfen
von/nach ausfuellen, fertig.

Gruss - Peter