VBA Excel VLookup - Buscar un valor en una base de datos

VBA Excel VLookup - Buscar un valor en una base de datos

   30 noviembre       Luis Reyes

---

La función BuscarV o VLookup (en inglés) es una de las funciones más útiles e importantes de Microsoft Excel.

Generalmente se usa para buscar un valor particular en grandes hojas de datos donde la intervención manual puede ser complicada. 

Para automatizar las tareas se puede incluir en una macro, la cual dejo aquí.

Sub BuscarCodigo()
'Definimos variables
Dim ValorBuscado As Variant, Valor As Variant, RangoBuscar As Range
Valor = Range("A1").value 'celda con el valor buscado
Set RangoBuscar = Range("A10:D232") 'rango donde buscar
ValorBuscado = Application.VLookup(Valor, RangoBuscar, 3, False) 'Queremos la columna 3
'Si no encuentra valor terminamos la macro
    If IsError(ValorBuscado) Then
    Exit Sub 
Else
MsgBox ValorBuscado
End If
End Sub

Descarga el Archivo