Buscar palabra clave en Excel (macro)

06 Feb Buscar palabra clave en Excel (macro)

Buscar palabra clave en Excel (macro)

¿Cómo podemos buscar una palabra clave generado por una macro en Excel?

La siguiente macro nos permite realizar una búsqueda de una palabra clave (sensible a mayúsc/minusc), devolviendo por medio de un mensaje su ubicación absoluta en fila y columna. En caso de encontrar más de una coincidencia, devolverá un mensaje con la ubicación para cada valor encontrado, y de no hallar más coincidencias o no hallar ninguna devolverá un mensaje informándolo.

La instrucción a copiar dentro de un nuevo módulo en la ventana de Visual Basic es la siguiente:

BUSCAR PALABRA CLAVE EN EXCEL

Sub BuscarPalabraClave()
    Dim ValorBusqueda As String
    Dim RangoBusqueda As Range
    Dim CeldaEncontrada As Range

    ValorBusqueda = InputBox("Ingrese la palabra clave a buscar")
    If ValorBusqueda = "" Then Exit Sub

    Set RangoBusqueda = Range("A2:A20")

    For Each CeldaEncontrada In RangoBusqueda
        If InStr(1, CeldaEncontrada.Value, ValorBusqueda) > 0 Then
            MsgBox "Palabra clave encontrada en la celda: " & CeldaEncontrada.Address
            Exit For
        End If
    Next CeldaEncontrada

    If CeldaEncontrada Is Nothing Then
        MsgBox "Palabra clave no encontrada en el rango seleccionado"
    End If

End Sub

En este caso nombramos arbitrariamente a la macro con el nombre «BuscarPalabraClave» para su identificación. Si deseamos que sólo devuelva la información de ubicación para el primer valor hallado, debemos eliminar la línea de código «Exit For».

De esta forma logramos buscar una palabra clave de forma rápida y fácil mediante macros en Excel.

Te recomiendo ver el siguiente link con más videos de Macros útiles de Excel AQUÍ.

¿No sabés como instalar esta macro? ¡No te preocupes!  Aquí está la solución:

Salvo aclaración, todas las fórmulas y macros de este sitio están configuradas para aplicarse sobre la celda A1. Algunas fórmulas se encuentran encerradas entre llaves {} debido a que son fórmulas matriciales. Estas llaves no deben introducirse tecleándolas, sino que se generan automáticamente al aceptar la fórmula pulsando Control+Shift+Enter al mismo tiempo. Las fórmulas de este sitio son compatibles con versiones de Microsoft Excel® 2010 o superiores.