setzt den Focus in falsche TextBox
10.02.2004 21:11:36
Beni
ich bin es schon wieder,
TextBox1.SetFocus trotzdem setzt er den Focus in TextBox3,
ich sehe keinen Fehler.
Gruss Beni
Private Sub TextBox1_Change()
Cells(Zeile, 1) = TextBox1
End Sub
Private Sub TextBox2_Enter()
On Error GoTo Fehler
Cells(Zeile, 1) = CDate(TextBox1)
Fehler:
TextBox1 = ""
TextBox1.SetFocus
MsgBox "Falsche Eingabe)"
End Sub