Vorhanden ist eine Tabelle mit den Feldern PLZ und Ort.
Beide Felder werden im Formular dargestellt.
PLZ ist ein Kombinationsfeld. Mein Ziel ist das bei Anwahl der entsprechenden PLZ der dazugehörige Ort auch angezeigt wird (Also der komplette Datensatz). Wie erreiche ich dies ?
Vorhanden ist eine Tabelle mit den Feldern PLZ und Ort.
Beide Felder werden im Formular dargestellt.
PLZ ist ein Kombinationsfeld. Mein Ziel ist das bei Anwahl der
entsprechenden PLZ der dazugehörige Ort auch angezeigt wird
(Also der komplette Datensatz). Wie erreiche ich dies ?
Vielleicht so?
Dim db As Database, rst As Recordset
Set db = CurrentDb
Set rst = db.OpenRecordset(„Name_der_Tabelle“, dbOpenSnapshot)
rst.FindFirst "Name_Feld_PLZ_in_Tabelle = " & Me![Kombinationsfeld_PLZ]
Me![Name_von_Feld_Ort_im_Formular] = rst![Name_Feld_Ort_in_Tabelle]
rst.Close
Set rst = Nothing
db.Close
Set db = Nothing
Den Code nach Anpassen der Namen in das AfterUpdate- (NachÄnderung) Ereignis des Kombinationsfelds kopieren.
Mal abgesehen von allem anderen ist es m.E. keine so gute Idee, Postleitzahlen und Ortsnamen hart zu verdrahten, da Postleitzahlen nicht eindeutig sind (es gibt einzelne Postleitzahlen, denen über 100 verschiedene Ortsnamen zugeordnet sind!)
Ansonsten schau dir vielleicht auch mal im DBWiki (http://www.dbwiki.de) das Beispiel „FormLinkedTables“ an.
Hallo Andre
Mach mal eine Abfrage mit PLZ und Ort
Füge diese Abfrage als Unterformular ein. Nun sollte es dir immer den passenden Ort zur PLZ anzeigen.
viel Spaß
Dieter