UserForm Setfocus Problem

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I have several textboxes to collect bank account details. I'm running the
following code on exit:

Private Sub txtBankNum1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Len(txtBankNum1) < 2 Then
MsgBox "Please enter the two digit bank code."
txtBankNum1.SetFocus
End If
End Sub

Problem is that this doesn't reset the cursor to txtBankNum1, it just moves
on to the next box as normal. Any ideas?
 
Have you tried
Private Sub txtBankNum1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Len(txtBankNum1) < 2 Then
MsgBox "Please enter the two digit bank code."
Cancel = True
End If
End Sub

hth

Geoff
 
Cheers, perfect.

Geoff said:
Have you tried
Private Sub txtBankNum1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Len(txtBankNum1) < 2 Then
MsgBox "Please enter the two digit bank code."
Cancel = True
End If
End Sub

hth

Geoff
Click to expand...
 
Back
Top