¿Cómo buscar un valor y obtener varios valores correspondientes en Excel?
Este tutorial trata sobre cómo buscar un valor y devolver varios valores correspondientes en Excel, tal como se muestra en las siguientes capturas de pantalla:
Buscar un valor y devolver varios valores correspondientes con una fórmula matricial
Buscar un valor y devolver varios valores correspondientes con Filtro
Buscar un valor y devolver varios valores correspondientes con una función definida
Buscar un valor y devolver varios valores correspondientes con una fórmula matricial
Aquí tiene una extensa fórmula matricial que le permite buscar un valor y obtener varios resultados correspondientes.
1. Introduzca el valor que desea buscar en una celda vacía. Consulte la captura de pantalla:
2. En la celda adyacente, escriba esta fórmula =SI(ESERROR(INDICE($A$1:$B$7,PEQUEÑO(SI($A$1:$A$7=$D$4,FILA($A$1:$A$7)),FILA(1:1)),2)),«»,)
INDICE($A$1:$B$7,PEQUEÑO(SI($A$1:$A$7=$D$4,FILA($A$1:$A$7)),FILA(1:1)),2))en ella y pulse Mayús + Ctrl + Introsimultáneamente; después, arrastre el controlador de autorrellenohacia abajo hasta que aparezca la primera celda en blanco. Vea la captura de pantalla:
Nota: En la fórmula anterior, $A$1:$B$7 indica el rango de datos; $A$1:$A$7 representa la columna en la que se busca el valor especificado; $D$4 hace referencia a la celda donde se introduce el valor de búsqueda en el paso 1, y el número 2 señala que los valores correspondientes se ubican en la segunda columna.
Buscar un valor y devolver varios valores correspondientes con Filtro
En Excel, también puedes usar la función Filtro para resolver este problema.
1. Seleccione el rango de columnas en el que desea buscar el valor y haga clic en Datos > Filtro. Vea la captura de pantalla:
2. A continuación, haga clic en el botón de flecha de la primera celda de su rango seleccionado y active únicamente el valor que desea buscar en la lista desplegable. Vea la captura de pantalla:
3. Haga clic en Aceptar; ahora verá que solo se han filtrado el valor buscado y sus valores correspondientes.
Buscar un valor y devolver varios valores correspondientes con una función definida
Si le interesa la función definida, también puede resolver este problema utilizando dicha función.
1. Pulse Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
2. Haga clic en Módulo > Insertar para insertar una ventana de Módulo y copie el siguiente código VBA en dicha ventana.
VBA: Busca un valor y devuelve varios valores correspondientes.
Function MyVlookup(pWorkRng As Range, pRng As Range, pColumnIndex As Integer, Optional pType As String = "v")
'Updateby20140827
Dim xRow As Single
Dim xCol As Single
Dim arr() As Variant
ReDim arr(0)
For i = 1 To pRng.Rows.Count
If pWorkRng = pRng.Cells(i, 1) Then
arr(UBound(arr)) = pRng.Cells(i, pColumnIndex)
ReDim Preserve arr(UBound(arr) + 1)
End If
Next
If pType = "h" Then
xCol = Range(Application.Caller.Address).Columns.Count
For i = UBound(arr) To xCol
arr(UBound(arr)) = ""
ReDim Preserve arr(UBound(arr) + 1)
Next
ReDim Preserve arr(UBound(arr) - 1)
MyVlookup = arr
Else
xRow = Range(Application.Caller.Address).Rows.Count
For i = UBound(arr) To xRow
arr(UBound(arr)) = ""
ReDim Preserve arr(UBound(arr) + 1)
Next
ReDim Preserve arr(UBound(arr) - 1)
MyVlookup = Application.WorksheetFunction.Transpose(arr)
End If
End Function
3. Cierre esta ventana y escriba esta fórmula en una celda:=MiBúsquedaVertical(A10,$A$2:$B$7,2) (A10 indica el valor de búsqueda, $A$2:$B$7 indica el rango de datos y 2 indica el número de índice de columna). Pulse Mayús + Ctrl + Intro simultáneamente. Luego, arrastre el controlador de relleno hacia abajo, coloque el cursor en la barra de fórmulas y pulse nuevamente Mayús + Ctrl + Intro.
Consejo: Si desea obtener los valores en celdas horizontales, puede introducir esta fórmula: =MyVlookup(A10, $A$2:$B$7, 2, «h»).
Las mejores herramientas de productividad para Office
Potencie sus habilidades en Excel con Kutools para Excel y experimente una eficiencia como nunca antes.Kutools para Excel ofrece más de 300 funciones avanzadas para aumentar su productividad y Ahorrar tiempo.Haga clic aquí para obtener la función que más necesita...
Office Tab aporta una interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Active la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas dentro de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumente su productividad en un 50 % y elimine cientos de clics del ratón cada día!
Todos los complementos de Kutools en un solo instalador.
Kutools for Office es la suite que incluye complementos para Excel, Word, Outlook y PowerPoint, además de Office Tab Pro, ideal para equipos que trabajan en distintas aplicaciones de Office.
- Suite integral— complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un instalador, una licencia— configuración en minutos (compatible con MSI)
- Rendimiento mejorado en conjunto— productividad optimizada en todas las aplicaciones de Office
- Prueba gratuita de 30 días con todas las funciones— sin registro ni tarjeta de crédito
- La mejor relación calidad-precio— ahorre frente a la compra individual de complementos