was ok - suddenly get error 91

[AlexanderBB]

Dim RowNumber as long
 RowNumber= Columns("B").find(what:=cboJump,,xlValues,, xlRows,,,False).Row

The code is in Worksheet cboJump_KeyDown event.
I'm sure this worked yesterday

I also tried Dim Rownumber as Range and "Set RowNumber = ..." but same error.

 

[dmt32]

Hi,
assuming rest of you code all ok then error suggests value in cboJump cannot be found.

try updating your code to manage.

    Dim RowNumber As Range
    Set RowNumber = Columns("B").Find(cbojump, xlValues, , xlRows, , , False)
    
    If Not RowNumber Is Nothing Then
    'record found
    MsgBox RowNumber.Row
    Else
        MsgBox cbojump.Text & Chr(10) & "Record Not Found", 48, "Not Found"
    End If

Dave