Bei Speichern nach Wert suchen(textbox)
15.12.2014 11:18:52
He
kleines Problem. ich habe eine userform mit textboxen die manuell beschrieben werden, anschließend per SPEICHERN button in einen tabelle übertragen werden.alles gut.
eine textbox ist zum eintragen von e-mail adressen. jetzt möchte ich das wenn auf 'speichern' gedrückt wird diese textbox überprüft wird ob ein '@' darin vorkommt. ich brauche keine komplette e-mail gültigkeitsprüfung, das
@ reicht mir. ich bekomme es zwar hin die textbox nach einem @ zu durchsuchen, kann dem aber nicht klarmachen das davor und danach noch unbestimmt viele zeichen folgen können.
sollte die textbox komplett leer sein ist auch alles ok und es kann normal weitergehn:
If TextBox14.Text "*@*" Then Exit Sub
MsgBox ("Korrekte E-Mail Adresse Eintragen(Anprechpartner1)")
Else
Tabelle9.Cells(lZeile, 13).Value = TextBox14.Text
das mit den * sternchen war nur ein versuch(hätte ja klappen können)