Focus nicht verlassen
06.10.2016 06:04:58
Markus
bei diesem VBA in einem Formular, verlässt Excel einfach das Feld, obwohl ich einen Focus setze bei Fehler.
Jetzt schon herzlichen Dank für einen Tipp
Markus
Private Sub txtANR_Exit(ByVal Cancel As MSForms.ReturnBoolean)
' Falls keine Eingabe gemacht, Mustermann löschen ..
If txtANR.Value = "Mustermann Fritz" Then
txtANR.Value = ""
End If
' wenn Name & Vorname kürzer als 7 Zeichen, neuer Focus
If Len(txtANR.Value) Anzeige