Actividad pública reciente
Voto positivo a la respuesta
Mostrar mensaje o valor si no encuentra texto en un rango EXCEL VBA
Esta es tu solución: Sub buscando() dato = InputBox( que dato buscamos??? ) If dato = "" Then Exit Sub Set busca = ActiveSheet.Range("b10:b100").Find(dato, LookIn:=xlValues, lookat:=xlWhole) If Not busca Is Nothing Then MsgBox "DATO ENCONTRADO"...