Supportnet / Forum / Datenbanken

Hallo, Ich habe eine Tabelle mit Personen, die sehr sehr viele Eigenschaften haben. Nu habe ich die Tabelle aufgeteilt in zwei und mit einer 1:1 Beziehung über die PersonalNr verknüpft. Tabelle1 hat also eine verwandte Tabelle2 Wenn ich in Tabelle1 eine neue Person hinzufüge möchte ich, dass sie an Tabelle2 auch angehängt wird. Wie geht das am besten?? Ich habe ein Formular mit Tabelle 1 und öffne dieses mit DoCmd.GoToRecord , , acNewRec Private Sub Form_AfterUpdate() MsgBox "Nach Aktualisierung " & Me.PersonalNr Dim ttab1 As DAO.Recordset Set ttab1 = CurrentDb.OpenRecordset("Tabelle2", dbOpenDynaset) ttab1.MoveLast With ttab1 .AddNew !PersonalNr = Me.PersonalNr !BABemerkung = "Von mir GG eingefügt " .Update .Bookmark = .LastModified ttab1.Close End With End Sub Ja, das fügt eben bei jeder Änderung an, ich möchte ja nur wenn der Datensatz neu ist. Welches Ereignis nehme ich da ???????? Gruß Gudrun

Das für dich zuständige Ereignis heißt "NachEingabe". Das wird nur ausgeführt, wenn ein neuer Datensatz tatsächlich gespeichert wurde.

Was soll eigentlich diese Zeile bewirken?

.Bookmark = .LastModified

Ja , ich habe vorher in der Hilfe von Access nachgesehen unter
AddNew-Methode (Beispiel)

und da stand das mit dem Bookmark dabei - ohne zu überlegen habe ich es mit übernommen.

Danke für die Antwort, es hat mir geholfen.

• Excel in Access impoertieren
• Access Tabellendatensatz kopieren
• Verknüpfungen in Access
• Access-Tabelle: Wie füge ich Felder an eine aus Excel übernommene Tabelle an?
• Access Tabellen