Seleccionar la hoja y la celda con el dato

Experto Dante, me ayudaste con una macro para buscar fecha, ahora lo que quiero es poner un dato en la celda A1 y que lo busque en todas las hojas, cuando lo encuentre se cambie a esa hoja y me seleccione la celda con el dato.

Nuevamente Gracias por tu colaboración.

1 respuesta

Respuesta
1

Te anexo la nueva versión de la macro, pon la macro en los eventos de tu hoja.

Private Sub Worksheet_Change(ByVal Target As Range)
'Por.Dante Amor
    If Target.Count > 1 Then Exit Sub
    If Target.Address <> "$A$1" Then Exit Sub
    If Target = "" Then Exit Sub
    For Each h In Sheets
        Set b = h.Cells.Find(Target)
        If Not b Is Nothing Then
            h.Select
            b.Select
        End If
    Next
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas