Ayuda con una macro que marca error!
Hola a todos:
hola, tengo esta macro que me genera un inputbox para buscar un dato en una hoja, el problema es que si no ingreso el texto correcto me tira un error en la macro, lo que quiero es que en lugar de que marque error, me aparesca un msgbox de advertencia, el codigo es este:
Sub buscar_dato()
Buscardato = InputBox("Deme el nombre que buscas...")
If Buscardato <> "" Then
Range("A5").Select
Cells.Find(What:=Buscardato, After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
, SearchFormat:=False).Activate
Selection.EntireRow.Select
End If
End Sub
Respuesta de Enrique Bernal
1