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
Hallo,
z. B.:
Sub txtAuftragsnummer_Beforeupdate(Cancel as Integer)
If DCount("*","tblAufträge","Auftragsnummer='" & Me!txtAuftragsnummer & "'") = 0 Then
Msgbox "Gibt's nicht. Nochmal."
End If
End Sub