Datensatz aus UF zum aktuellen Datensatz im HF machen

[smily68]

Hallo

Ich habe folgende Konstellation. HF und UF beide haben die selbe Abfrage hinterlegt, sind jedoch nicht miteinander verknüpft. Im HF habe ich ein Kombifeld mit dem ich die Datensätze im UF filtere. Nun möchte ich mit einem Doppelclick auf einem Datensatz im UF diesen zum aktuellen Datensatz im HF machen.

Wie mache ich das? Ich habe es mit folgendem Code versucht. Dieser Code funktioniert nur wenn die Untertabelle nicht gefiltert ist. Sobald ich vom HF aus einen Filter auf das UF setze und mit einem Doppelclick den Datensatz im UF auswähle, gibt es folgende Fehlermeldung: "Keine Zulässige Textmarke"

Hier der Code:

Private Sub Form_DblClick(Cancel As Integer)

        Dim rs As DAO.Recordset

        Set rs = Me.RecordsetClone
        rs.FindFirst "gruppe1_ID = " & Me.gruppe1_ID
        If Not rs.NoMatch Then
            Forms!frmGruppe1.Bookmark = rs.Bookmark
        End If
        Set rs = Nothing

End Sub

Wer kann mir helfen?

Gruss Daniel

[Beaker s.a.]

Hallo Daniel,
Von einem UFo kannst Du mit Me.Parent auf
das HFo zugreifen:

Code [Auswählen] Erweitern

Private Sub Form_DblClick(Cancel As Integer)

        Dim rs As DAO.Recordset

        Set rs = Me.Parent.RecordsetClone
        rs.FindFirst "gruppe1_ID = " & Me.gruppe1_ID
        If Not rs.NoMatch Then
            Me.Parent.Bookmark = rs.Bookmark
        End If
        Set rs = Nothing

End Sub

(ungetestet)
hth
gruss ekkehard