Office: Tabulatorsprung rückgangig machen, wenn Textbox leer verlassen wurde

Hallo zusammen,

habe eine Userform mit diveresen Comboboxen und Textfeldern, die final vom User auszufüllen sind.
Verlässt man nun einen solchen Eingabe bzw. Auswahlbereich ohne Eintrag mit Tab oder Enter, so soll nach einer Meldung der Cursor in der Zelle verbleiben, bekomme das aber nicht hin:

Bsp mit Textbox =>

Private Sub TB_VN_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If TB_VN.Value = "" Then
MsgBox "Bitte Vornamen eintragen!", vbOKOnly, "Hinweis"
End If
TB_VN.SetFocus
End Sub

Danke vorab

Stefan

:)

 

Du musst den Parameter Cancel auf true setzen
SetFocus kann weg

 

Super, klappt - Danke

 

Es gibt da aber doch noch ein Problem:
Bei der letzten Textbox in diesem Frame passiert nix, wie bekomme ich das hin?

 

Stell mal um in den Formulareigenschaften unter Cycle auf fmCycleCurrentForm

 

gewusst wie - besten Dank