Coursor in Textbox bei ShowModal=False
13.02.2009 12:14:00
WolfgangN
ich habe eine Textbox in einem Userform. Mit untenstehendem Code erreiche ich, dass bei Falscheingabe der Coursor in der Textbox verbleibt. Dies klappt auch, wenn jedoch die Eigenschaft des Userforms auf ShowModal = False gesetzt wird, bleibt der Coursor nicht in der Textbox.
Gibt es eine einfache Möglichkeit dies zu erreichen, eventuell eine Eigenschaft ändern oder einige Codezeilen hinzufügen?
Im Code kann ich ShowModal nicht ändern.
Wenn es mit vertretbarem Aufwand nicht möglich ist, auch nicht so schlimm, ist nur ein Schönheitsfehler.
Vielen Dank und Gruß
Wolfgang
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If TextBox1 "Test" Then
MsgBox "Falsche Eingabe"
TextBox1 = ""
Cancel = True
End If
End Sub
Anzeige