Unfortunately that didn't work - when I put in

me.facecheck.setfocus - it gave an error
facecheck.setfocus - didn't do anything.

Code
Sub txbFaceAmt_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Call FaceLimitCheck(txbFaceAmt)
End Sub

Sub FaceLimitCheck(Facecheck)
If Not (Facecheck = vbNullString) Then
If Not (IsNumeric(Facecheck)) Then
MsgBox ("Invalid entry please use numbers")
Facecheck.Value = ""
Facecheck.SetFocus
Else
If Facecheck < 25000 Then
MsgBox ("Minimum face amount is 25,000")
Facecheck.Value = ""
Else
Facecheck.Value = Format(Facecheck, "$ #,##0,000")
End If
End If
End If
Call CheckTotalFace
End Sub




--
Wag more, bark less


"Dave Peterson" wrote:

Try

Me.txbfaceamt.SetFocus

Brad wrote:

How do you select an item on a user form?

This is incorrect - txbFaceAmt.Select

But it would be great if this worked.

--

Dave Peterson
.