Nach Eingabe auf doppelten Schlⁿsselwert prⁿfen

Zur 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. ╓ffnen Sie Ihr Formular in der Entwurfsansicht, klicken Sie mit der rechten Maustaste auf das Feld des PrimΣrschlⁿssels und rufen Sie die ╗Eigenschaften½ auf. Unter ╗Ereignis½ klicken Sie auf die SchaltflΣche neben ╗Vor Aktualisierung½. WΣhlen Sie den ╗Code-Editor½ und bestΣtigen Sie mit ╗OK½. Access legt eine leere Prozedur an, in die Sie den VBA-Code schreiben. Sie finden ihn im Kasten oder auf der Heft-CD: HCHIP-Code FLDPRUEF Sie mⁿssen ihn nur noch abstimmen. Der Quelltext geht von der Tabelle ╗Namen½ aus, deren Feld ╗Nachname½ als PrimΣrschlⁿssel dient. Das Eingabefeld trΣgt den Namen ╗EingabeNachname½; der Quelltext verweist mit ╗Me![EingabeNachname]½ auf dieses Feld. Private Sub EingabeNachname_BeforeUpdate (Cancel As Integer) Dim dbs As Database Dim rst As Recordset Set dbs = CurrentDb Set rst = dbs.OpenRecord- set(äNamenô, dbOpenDynaset) rst.FindFirst ä[Nachna- me]= æä & Me![EingabeNachna- me] & äæä 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