En caso de error en la macro realizar una acción
Tengo una macro en la que la persona ingresa un código y la macro lo busca en una hoja. Lo que necesito es que cuando ese buscar produzca un error en el caso de que se haya ingresado un código que no existe, quiero que aparezca un msgbox diciendo "la intentar seleccionada no existe" y la persona haga click en aceptar y que se vuela a poner el cursor en donde la persona debe ingresar el código. Mando esa parte de la macro gracias :). Ahora como lo que aparece es que ningún código existe supuestamente
On Error GoTo ErrorHandler
Cells.Find(What:=Sheets("Temp").Cells(2, 6).Value, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=True).Activate
Exit Sub
ErrorHandler:
MsgBox "No existe posición seleccionada.", vbInformation + vbOKOnly
ComboBoxDrive.SetFocus
Resume Next
Sheets("Temp").Select