Problem setting focus to a different textbox

[mumps]

I am trying to use the following code to change focus to a different text box on a user form if the value of the active textbox is found in Sheet1. The code works properly if the value is not found but if the value is found, I get this error message: "Unexpected call to method or property access." I have been researching some possible solutions but without success. Any suggestions would be greatly appreciated.

Private Sub TextBox23_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    Dim fnd As Range
    Set fnd = Sheets("Sheet1").Range("H:H").Find(TextBox23.Value, LookIn:=xlValues, lookat:=xlWhole)
    If fnd Is Nothing Then
        MsgBox ("Not found.")
        TextBox23.Value = ""
        Cancel = True
    Else
        TextBox8.SetFocus
    End If
End Sub

 

[EXCEL MAX]

We are glad you are found solution by itself.