PDA

Vollständige Version anzeigen : gültigkeitsregel?


Gast
11.05.2004, 12:11
hallo forum,

habe eine einfache Frage. In einem Formular wenn in ein Feld ein Wert eingeben wird, soll ein anderes Feld pflichtfeld werden.
Ich kriegge nicht hin.

Danke im voraus

stpimi
11.05.2004, 12:15
Da musst Du mit VBA eine kurze Ereignisprozedur schreiben:

Im Ereignis BeforeUpdate des Formulares :

If not isnull(Me!Feld1) then
If isnull(Me!Feld2) then
Msgbox "Feld muss gefüllt sein!"
Me!Feld2.SetFocus
Cancel = true
exit sub
end if
end if

ungetestet!

Mfg, Michael

Hennes
11.05.2004, 12:18
If txt0 > 0Then

txt1.SetFocus

End If

so, oder was meinst du? also auf jeden fall mit if... then und da kann man dann eine MsgBox oder irgendwas anderes dranhängen (oder halt nur den fokus setzen)
Hennes

immer alle schneller und ausführlicher :bawling:

J_Eilers
11.05.2004, 12:25
Hi,

oder durchlaufe einfach alle Pflichtfelder in einer Schleife. Setze dazu in alle Pflichtfelder eine Marke x (Eigenschaften / Andere):

Dim ctl As Control

For Each ctl in Me.Controls
If ctl.Tag = "x" Then
If Len(Nz(ctl, "")) = 0 Then
MsgBox "Eine Eingabe in '" & ctl.Name & "' ist erforderlich!"
ctl.SetFocus
Exit For
End If
End If
Next ctl

Gast
11.05.2004, 12:44
danke, funktioniert super!
gruss
Gast