Find, Error Trap (Excel 2010 VBA)

I am trying to trap an error where the Value of hcpc(i) is not found on the data sheet. Partial code is below.

                Set rngFound = lookupsht.Range("A1:H1257").Find(hcpc(i), , , xlWhole)
                          ruv(i) = rngFound.Offset(, 1).Value

I tried this:

                Set rngFound = lookupsht.Range("A1:H1257").Find(hcpc(i), , , xlWhole)
                If ruv(i) = rngFound.Offset(, 1).Value Is Empty Then
                    feevalue(i) = 0
                    descrip(i) = "Unidentifiable Charge"
                    reason(i) = "HCPC Code Not Found in Fee Schedule"
                Else
                    ruv(i) = rngFound.Offset(, 1).Value