TextBox - Exit-Ereignis
03.02.2022 12:28:41
{Boris}
gegeben: Userform mit 3 Textboxen: Textbox1, Textbox2 und Textbox3 sowie 1 Commandbutton.
https://www.herber.de/bbs/user/150831.xlsm
Bei folgendem Code für Textbox1 wird das Exit-Ereignis 2 mal ausgeführt (die MsgBox erscheint 2 mal) - das liegt offensichtlich an der letzten Zeile, die Textbox3 zu "fokussieren", denn ohne dies wird nur 1 mal ausgeführt.
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
MsgBox "Du verlässt Textbox1"
Me.TextBox3.SetFocus
End Sub
Private Sub CommandButton1_Click()
Unload Me
End Sub
VG, Boris