Supportnet / Forum / Datenbanken

Sehr geehrte Gemeinde, Ich habe eine Tabelle [b]tbl_Hstl[/b] und ein Formular [b]frm_dat_neu[/b]. Im Formular existiert ein Kombifeld über welches man einen bestimmten [b]Hersteller [/b](aus [b]tbl_Hstl[/b]) aussuchen kann. Im nächsten, darunter liegenden, Textfeld wird automatisch die zugehörige [b]Hstl_ID[/b] angezeigt, welche auch aus der [b]tbl_Hstl[/b] kommt (mittels dlookup gelöst). In einem weiteren Textfeld des [b]frm_dat_neu[/b] soll nun eine neue Artikelnummer eingegeben werden. Letztendlich möchte ich, dass die gewählten und eingegebenen Werte aus dem Formular [b]frm_dat_neu[/b] (nur das Feld [b]ArtNr [/b]ist an die Tabelle [b]tbl_dat_neu [/b]gebunden) in die Tabelle [b]tbl_dat_neu[/b] übertragen werden. Das bedeutet ein Datensatz mit den Werten [b]Hersteller[/b], [b]Hst_ID [/b]und [b]ArtNr[/b] in [b]tbl_dat_neu[/b]. Mit welcher Ereignisprozedur und welchen Befehlen könnte ich mein Problem lösen? Danke

Warum verwendest Du keine gebundenen Felder ?

Gruß
Teddy

Hallo Teddy,

die Daten für das Formular frm_dat_neu beziehe ich aus der Tabelle tbl_Hstl und möchte sie aber nach Auswahl in die Tabelle tbl_dat_neu schreiben. Gebundene Felder kann ich doch nur verwenden bei einem Formular mit EINER zugrundeliegenden Tabelle. Vielleicht irre ich mich ja, bin für jeden Hinweis dankbar.

Gruß samuel_k

Hallo,

ich habe die Lösung im Forum gefunden und für mich modifiziert.

Sub Befehl75_Click()
Dim rs As Recordset
Set rs = CurrentDb.OpenRecordset("tbl_dat_neu")
rs.AddNew
rs!Hersteller = Me!cbo_Hstl2
rs!Hstl_ID = Me!Hstl_ID
rs!ArtNr = Me!ArtNr
rs.Update
rs.Close
Set rs = Nothing
End Sub

Danke

Alternativ kann man die Felder in ein Unterformular legen - das kann nämlich eine andere Datenquelle haben.
Gruß
Teddy

• neue tabelle erstellen
• daten in zweites tabellenblatt verschieben
• Mehrseitiges Formular in Access
• DomAnzahl
• datensätze fehlen im formular - warum? bzw. wie beheben?