Textbox Datenüberprüfung
29.08.2016 10:20:51
Christof
Private Sub TextBox4_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Not TextBox4.Value = "Einnahmen" Or TextBox4.Value = "Ausgaben" Then
TextBox4.Value = ""
MsgBox "Bitte eine gültige Art eingeben"
End If
End Sub
LG Christof