Utilice la propiedad WorksheetFunction en Excel VBA para acceder al BUSCARV función. Todo lo que necesita es una sola línea de código.
Situación:
1. Coloque un botón de comando en su hoja de trabajo y agregue la siguiente línea de código:
Rango ("H3"). Valor = WorksheetFunction.VLookup (Rango ("H2"), Rango ("B3: E9"), 4, Falso)
Cuando hace clic en el botón de comando en la hoja de trabajo, Excel VBA usa la función BUSCARV para buscar el salario de ID 53 y coloca el resultado en la celda H3.
Nota: visite nuestra página sobre la función BUSCARV para obtener más información sobre esta función de Excel.
Si la función BUSCARV no puede encontrar una coincidencia, Excel VBA devuelve el mensaje "No se puede obtener el Propiedad VLookup del error de la clase WorksheetFunction ".
2. Por ejemplo, ingrese el valor 28 en la celda H2.
Resultado al hacer clic en el botón de comando en la hoja:
3. Para reemplazar este error con un mensaje amigable, actualice el código de la siguiente manera.
En caso de error, vaya a InvalidValue:
Rango ("H3"). Valor = WorksheetFunction.VLookup (Rango ("H2"), Rango ("B3: E9"), 4, Falso)
Salir de Sub
InvalidValue: Rango ("H3"). Valor = "No encontrado"
Resultado al hacer clic en el botón de comando en la hoja:
Nota: visite nuestra página sobre manejo de errores para obtener más información sobre este tema.
