Office: (Office 2010) Datensatz aus Ufo2 auch in Ufo1 anzeigen

Liebe Forenmitglieder. Ich benötige wieder Eure Hilfe.
Ich habe ein Formular mit Stammdaten und zwei eingebetteten Unterformulare mit ergänzenden Daten.
Wenn im Ufo1 ein Datensatz angelegt wird, erscheint dieser nach dem Speichern auch im Ufo2.
Das Ufo2 ist ein Endlosformular wo die Daten, die zuvor als Einzeldatensätze (Abwesenheiten) im Ufo 1 angelegt worden sind - entsprechend zum Stammdatensatz in Form einer Übersicht angezeigt werden.

Jetzt möchte ich erreichen, dass ich wenn ich im Ufo2 einen der angelegten Datensätze (Button) anklicke - ich den passenden Datensatz im Ufo 1 angezeigt bekomme. Also das Ufo 1 synchron wird - je nach dem ausgewählten Datensatz im Ufo2

Dazu habe ich folgende 2 Ansätze getätigt. Leider beide ohne Erfolg.

Ansatz 1

Code:

Forms!Ufo2!Ufo1.Recordset.FindFirst "ID = " & Me!ID

Ansatz 2

Code:

Dim RS As DAO.Recordset
Set RS = Forms!Ufo2.RecordsetClone
RS.FindFirst "[Id] = " & Me!Ufo1.Id 'Datensatz suchen
Forms!Ufo1.Bookmark = RS.Bookmark 'Wenn Datensatz gefunden, gehe hin
[CODE]
Ich vermute mal das ich aus dem Ufo heraus das andere Ufo anders ansprechen muss (?)

 

Hallo,
wie sieht es mit

Code:

Forms!HaFo!Ufo1.Recordset.FindFirst "ID = " & Me!ID

aus?
Wobei mit Ufo1 natürlich der Name des Unterformulares im Hauptformular gemeint ist.

Gruß
Doming

 

Hallo Doming
HaFo und Ufo Namen angepasst.

Leider nein.

Ich erhalte die Fehlermeldung "Laufzeitfehler 438" Objekt unterstützt diese Eigenschaft oder Methode nicht
Gebe ich an statt dem HaFo Namen den Namen von Ufo 2 an bekomme ich die Fehlermeldung "2450" Microsoft Access kann das Formular Ufo2 nicht finden, auf das verwiesen wird

 

Hier wird darüber referiert:
https://www.access.joposol.com/beispiele/formulare/formulare-synchronisieren

 

Guten Morgen
Ich habe mir den Link angeschaut, durchgelesen und versucht umzusetzen. Leider komme ich damit nur bedingt klar.
Einen Fehler erhalte ich bereits bei dem Punkt "Detailformular"

Code:

 Dim WithEvents m_EndlosForm As Form_frmEndlos [Code]

weil ich gar nicht weiß "Deklaration mit Whitevents" an welcher Stelle das im Detailformular hingehört.

 

Hallo,
falls zu dieser Problematik mal jemand anderes einen Anstoß benötigt. Ich konnte mein Problem jetzt so lösen. Es hing an der Schreibweise. Jetzt wird genau das gemacht, was ich möchte. Wenn ich einen Datensatz im Endlosformular auswähle, wird im anderen Unterformular der Detaildatensatz dazu angezeigt.

Code:

Private Sub Btn_Detail_DS_anzeigen_Click()
Forms!frm_start!UfrmDetail.Form.Recordset.FindFirst "id = " & Me!ID
End Sub
[Code]

Auf die Sprünge geholfen hat mir bei der Schreibweisenformulierung:
[URL]https://www.access-o-mania.de/forum/index.php?topic=25381.0[/URL]
#2

 

Prima, danke auch für den Link.