![]() |
||
![]() |
Nach Eingabe auf doppelten Schlüsselwert prüfenZur Eingabe in meine Datenbank nutze ich Formulare. Das erste Eingabefeld speichert den Primärschlüssel. Ist es möglich, dass Access gleich bei Eingabe in dieses Feld auf einen doppelten Wert prüft? Eine VBA-Prozedur kann nach Eingabe des Schlüsselwerts in der Tabelle nach einem Datensatz mit demselben Schlüssel suchen und gibt im Konfliktfall eine Meldung aus. Private Sub EingabeNachname_BeforeUpdate (Cancel As Integer) Dim dbs As Database Dim rst As Recordset Set dbs = CurrentDb Set rst = dbs.OpenRecordset(„Namen“, dbOpenDynaset) rst.FindFirst „[Nachname]= ‘„ & Me![EingabeNachname] & „‘„ If Not rst.NoMatch Then MsgBox „Dieser Wert ist bereits vergeben! Bitte wählen Sie einen anderen...“ End If rst.Close Set dbs = Nothing End Sub |
![]() |