Try inserting the following at the beginning of the event.

For ADO:
If recordset.EOF then
Exit Sub
End If

For DAO:
If recordset.NoMatch then
Exit Sub
End If

this will check if the find succeeded before running any other code. Hope it helps.