Macro para buscar un dato especifico y eliminar la fila completa
Tengo esta Macro para buscar y eliminar una fila completa si encuentra el valor entregado:
Sub Eliminar_Celdas()
BuscarDato = InputBox("Ingrese el Dato a Buscar y Eliminar")
Range("A1").Select
Cells.Find(What:="BuscarDato", After:=ActiveCell, LookIn:=xlValues, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False, SearchFormat:=False).Activate
Selection.EntireRow.Delete
Range("A1").Select
End Sub
Al ejecutarla me arroja el error 91.
Que puede estar pasando. Más allá de enviarme la corrección me podrían explicar que sucede.
Respuesta de Victor Rodriguez
1
Prueba quitando las comillas de "Buscardato", ya que con las comillas le estas diciendo que busque el texto Buscardato, no el valor que le has dado a la variable Buscardato mediante el inputbox
