Buscador inputbox

[HERMES65]

Buenas noches, tengo un buscador con inputbox que me selecciona un nombre de una columna. Pero estoy intentando que me seleccione toda la fila hasta el 31 y no puedo, me podríais ayudar porfavor, gracias..

 

[Héctor Miguel]

que me seleccione toda la fila hasta el 31

cambia tus instrucciones por algo +/- como esto:

Sub buscapalabra()
  On Error Resume Next
  With Columns("b").Find(InputBox("ingresa el nombre"))
    Intersect(.CurrentRegion, .EntireRow).Select
  End With
End Sub

 

[HERMES65]

Muchísimas gracias Héctor funcionó a la primera.. gracias...

 

[Héctor Miguel]