Nach eingabe von Wert Tabelle prüfen

[gumpili]

Hallo zusammen,
ich habe ein Formular in  dem ich Werte in eine Liste eingebe. Nach Eingabe soll aber geprüft werden ob dieser eingegebene Wert in der Tabelle existiert. Wenn der Wert nicht vorhanden ist muss eine Meldung kommen.
Hintergrund :
Ich importiere täglich Tabellen  (Anfügeabfrage) die Aufträge enthalten die geliefert werden müssen. In der Liste in meinem Formular
gebe ich Auftragsnummern ein  und am SChluss wenn ich auf Lieferschein erstellen klicke wird ein Kennzeichen gesetzt dass dieser Auftrag geliefert wurde.
Wenn ich jetzt aber eine Auftragsnummer eingebe die garnicht importiert wurde muss ich das ja als Meldung bekommen.

Danke schon mal
Gruß Andrea

[DF6GL]

Hallo,

z. B.:

Code [Auswählen] Erweitern

Sub txtAuftragsnummer_Beforeupdate(Cancel as Integer)
If DCount("*","tblAufträge","Auftragsnummer='" & Me!txtAuftragsnummer & "'") = 0 Then
  Msgbox "Gibt's nicht. Nochmal."
End If
End Sub