Neuigkeiten:

Wenn ihr euch für eine gute Antwort bedanken möchtet, im entsprechenden Posting einfach den Knopf "sag Danke" drücken!

Mobiles Hauptmenü

DS über UF im HF wechseln

Begonnen von mad, November 19, 2019, 19:53:52

⏪ vorheriges - nächstes ⏩

mad

Hallo Zusammen,

ich habe ein HF incl. UF. Datenherkunft ist für beide eine Abfrage. Im HF wird immer nur ein DS (Einzelnes Formular) und im UF alle Datensätze (Datenblatt) angezeigt.

Nun möchte ich folgendes erreichen, wenn ich einen DS im UF anklicke, daß dieser DS im HF angezeigt wird.
Im UF habe ich folgenden Code hinterlegt:
Private Sub Form_Click()
Me.Parent.Recordset.FindFirst "vorlageID=" & Me!vorlageID
End Sub


Der DS im HF wird zwar angezeigt, aber im UF wird die Markierung nicht beibehalten. Und es funktioniert auch nur wenn ich den Datensatzmarkierer im UF anklicke. Wenn ich ein Feld des Datensatzes anklicke passiert nichts.

Hätte jemand einen Tipp.

Danke
Mad

DF6GL

Hallo,

Zitataber im UF wird die Markierung nicht beibehalten


vermutlich erfährt das UF ein Requery,  z. B. durch die Einstellungen bei "Verknüpfen von/nach".

Zitat
Wenn ich ein Feld des Datensatzes anklicke passiert nichts.


Warum sollte es?  Es gibt keine Prozedur, die beim Klick auf ein Steuerelement aufgerufen wird....
Viele Grüße vom Bodensee
Franz, DF6GL

Hilfestellung:  http://www.access-o-mania.de/forum/index.php?topic=6969.msg118738#msg118738

Links und Tipps:
1.   http://v.hdm-stuttgart.de/~riekert/lehre/db-kelz/
1a. http://www.tinohempel.de/info/info/datenbank/normalisierung.htm
1b. https://support.office.com/de-de/article/Grundlagen-des-Datenbankentwurfs-eb2159cf-1e30-401a-8084-bd4f9c9ca1f5#bmterms
2.   http://www.donkarl.com
3.   https://web.archive.org/web/20201201233522/http://www.dbwiki.net/
4.   http://www.access-tutorial.de/
5.   http://www.tty1.net/smart-questions_de.htm
6.   http://access.joposol.com/accept

Last but not least:   < F1 > für Hilfe
;) Learning by doing not by spoon-feed ;)

Tipp: Find and Replace for Access

Beaker s.a.

@mad
Kannst du dir alles sparen wenn du das Form gleich als geteiltes Form einrichtest.
Damit geht das automatisch.
gruss ekkehard
Alles, was geschieht, geschieht. - Alles, was während seines Geschehens etwas anderes geschehen lässt, lässt etwas anderes geschehen. - Alles, was sich selbst im Zuge seines Geschehens erneut geschehen lässt, geschieht erneut. - Allerdings tut es das nicht unbedingt in chronologischer Reihenfolge.
(Douglas Adams, Mostly Harmless)

mad

Hallo Zusammen,
hat jetzt leider etwas gedauert, war immer noch auf der suche nach einer Lösung.

Ein geteiltes Formular würde zwar mein Problem auf einfache Weise lösen, kann ich aber leider nicht brauchen. Da eine horizontale oder vertikale Trennung mir zuviel Platz kosten würde.

Habe bei donkarl eine Lösung gefunden und diese wie folgt angewandt.
Private Sub Form_Click()
'Forenbeitrag von donkarl
Dim lngId As Long
    If Me.Recordset.RecordCount > 0 Then
    lngId = Me!vorlageID
    'Datensatz im Parent-Fenster aktualisieren
    Me.Parent.Recordset.FindFirst "vorlageID =" & lngId

    'zurueckkehren
    Me.Recordset.FindFirst "vorlageID =" & lngId
End If
End Sub

Funktioniert.

ZitatWenn ich ein Feld des Datensatzes anklicke passiert nichts.
ZitatWarum sollte es?  Es gibt keine Prozedur, die beim Klick auf ein Steuerelement aufgerufen wird....

Eigentlich sollte das eine zweite Frage sein, ob auch ein DS-Wechsel durch anklicken eines beliebigen Feldes eines DS möglich ist.
Wenn nicht ist es aber nicht tragisch.

Danke
mad

ebs17

ZitatEigentlich sollte das eine zweite Frage sein, ob auch ein DS-Wechsel durch anklicken eines beliebigen Feldes eines DS möglich ist.
Klar ist das möglich. Du brauchst nur im Klick-Event jeder dieser Textboxen eine diesbezügliche Ereignisprozedur hinterlegen.
Es könnte aber sein, dass sich das Editieren und Neuanlegen von Inhalten in diesem Datensatz etwas aufregender gestaltet.
Mit freundlichem Glück Auf!

Eberhard