Office: Prüfen ob bestimmte Felder ausgefüllt sind

Hallo Mickey

Zuerst: deine Lösung ist sicher nicht sehr benutzerfreundlich. Selbst wenn alle If's funktionieren, bekommt der User im Extremall 4 Messageboxen. *mad.gif*
Würde dir auf jeden Fall die sehr schöne Lösung *winner von Thomas empfehlen!

Zum Problem: was sind denn die ID_xxxx für Felder ?
Textfeld - Comboboxen - Listboxen ?

und sind sie tatsächlich NULL *confused.gif*

debuggen, wie bereits vorgeschlagen

 

Hallo Mickey

sowie das von Matthy angesprochene fehlende Cancel, nach jedem SetFocus.

Eine Prüfung dahingehend ob ein Feld wirklich Leer ist, führe ich mit

If Trim("" & Me.Feld) = "" Then
.
.
End If

durch, da es nicht nur den Status IsNull sondern auch IsEmpty gibt.

Gruß

Arno

 

Hallo Mickeyz,

hatte mal das gleiche Problem. Bin so vorgegangen:

If IsNull(Feld1) Then
MsgBox""
Feld1.SetFocus
Exit SuB
ElseIf IsNull(Feld2) Then
MsgBox""
Feld2.SetFocus
Exit Sub
ElseIf IsNull(Feld3) Then
MsgBox""
Feld3.SetFocus
Exit Sub
End If

Ich habe auf dem Formular einen Button eingefügt der den Datensatz speichern soll. In dem Button habe ich dann den Code eingefügt. Dieser prüft dann vor dem speichern, ob in die entsprechenden Felder Werte eingegeben wurde.

Gruß loco