Luis Mondelo respondió:
prueba mejor con el evento exit. En mi ejemplo tienes que sustituir textbox1 por el nombre de tu textbox. Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) If Not IsDate(TextBox1) Then MsgBox "no es fecha" TextBox1 = Empty Cancel =...
VBA setfocus no funciona