Código que busque un dato y si lo incuentra me selección una celda especifica

El día de hoy necesito de su colaboración para encontrar el código para que me busque un dato de una celda especifica en otro hoja y me seleccione otra celda de la misma fila de donde se encontró el dato.

Ejemplo:

A1 celda donde esta el dato a buscar

Hoja2 donde buscar el dato

Si lo encuentra: digamos que el dato lo encontró en la fila 100 celda b2, deseo que me seleccione la celda f2.

No se si me explique bien

1 respuesta

Respuesta

Te anexo la macro

Sub encontrar()
'Por.Dante Amor
    Set h1 = Sheets("hoja1")
    Set h2 = Sheets("hoja2")
    Set b = h2.Cells.Find(h1.[A1], lookat:=xlWhole)
    If Not b Is Nothing Then
        h2.Select
        h2.Cells(b.Row, "F").Select
    End If
End Sub

Saludos.Dante Amor

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas