Access PLZ/Ort

Question

Hallo zusammen

Habe Folgendes Probelm

Habe zwei Tabellen:

Grunddaten (Spalten: PLZ ¦ Ort ¦ Kanton ¦)
PLZ Verzeichnis (Spalten: PLZ ¦ Ort ¦ Kanton ¦)

Nun möchte ich, dass wenn ich in der Tabelle Grunddaten die PLZ eingebe (Spalte=ein Kombinationsfeld) in der danachfolgenden Spalte (Ort) der Orte erscheind und In der Spalte Kanton der Kanton.

Kann mir da jemand Helfen???

Ach ja, ich bin ein absoluter Neuling in Accsess, warhscheinlich ist dies eine ganz einfache Sache...

Leute habe aber doch schon verscuht es selber zu lösen ca. 3 Stunden.

Gruss
sano

Answer 1

klar, beim Anlegen des Combis schreibste in Format Spaltenanzahl 3, dann bekommst Du 3 Spalten angezeigt. Spaltenbreite dann entsprechend zum beispiel 2;1,5; 1. Also die jeweilige breite, die Du haben möchtest, eine Spalte die nicht angezeigt werden soll dann entsprechend Spaltenbreite 0. Hast du in der ersten Spalte die Datensatznummer, die nicht angezeigt werden, aber als Kriterium ausgewählt werden soll, dann stellst Du die Spaltenbreite auf 0.

In VBA ist das entsprechend Column (0), erste Spalte; die zweite Spalte ist Column(1) usw.

Hast Du noch Fragen, dann melde Dich.

Gruß marie

Answer 2

Danke Marie,

aber das hat schon mal einwandfrei funktioniert, möchte jedoch jetz nicht nur dass es mir bei der Spalte PLZ inder Auswahl die PLZ ,Ort und Kanton anzeigt sonderen dass im Tabellenblatt mir die danachfolgenden Felder entsprechend ausfüllt.

Answer 3

Alles kein Problem, nur müsstest Du dich jetzt mal konkreter ausdrücken, wenn Du es nicht selbst mit meiner obigen Antwort erstellen kannst. Wo sollen die Werte eingetragen werden?? Hast Du ein geöffnetes Formular, wo die Werte beim anklicken eingetragen werden sollen?

Habe Dir doch oben geschrieben, dass Du z. Bsp mit column(1) die zweite Spalte und mit column(0) die erste Spalte auslesen kannst. Dann halt dort eintragen wo Du es haben willst. Wenn Du in einem Formular die Felder PLZ und Wohnort hast, dann zum beispiel so:

Private Sub Kombinationsfeld_AfterUpdate()
PLZ = Me![Kombinationsfeld].Column(0)
Wohnort = Me![Kombinationsfeld].Column(1)
End Sub

Gruß Marie