Hoe waarde op te zoeken om meerdere corresponderende waarden in Excel te retourneren?
Deze tutorial heeft het over het opzoeken van een waarde om meerdere corresponderende waarden in Excel te retourneren, zoals hieronder wordt weergegeven:
Opzoekwaarde retourneert meerdere overeenkomstige waarden met matrixformule
Opzoekwaarde retourneert meerdere overeenkomende waarden met Filter
Opzoekwaarde retourneert meerdere overeenkomstige waarden met gedefinieerde functie
Opzoekwaarde retourneert meerdere overeenkomstige waarden met matrixformule
Hier is een lange matrixformule die een handje kan helpen bij het opzoeken van een waarde en meerdere overeenkomstige waarden kan retourneren.
1. Voer de waarde in die u in een lege cel wilt opzoeken. Zie screenshot:
2. Typ deze formule in de aangrenzende cel =IF(ISERROR(INDEX($A$1:$B$7,SMALL(IF($A$1:$A$7=$D$4,ROW($A$1:$A$7)),ROW(1:1)),2)),"",
INDEX($A$1:$B$7,SMALL(IF($A$1:$A$7=$D$4,ROW($A$1:$A$7)),ROW(1:1)),2)) erin en druk op Shift+Ctrl+Enter toetsen samen en versleep het Automatisch vullen om de cellen te vullen totdat de eerste lege cel tevoorschijn komt. Zie screenshot:
Opmerking: in de bovenstaande formule geeft $ A $ 1: $ B $ 7 de bereikgegevens aan, $ A $ 1: $ A $ 7 staat voor het kolombereik waarin u de bepaalde waarde opzoekt, $ D $ 4 geeft de cel aan die u opzoekt waarde in stap 1, 2 geeft aan dat de overeenkomstige waarden in de tweede kolom zijn gevonden.
Opzoekwaarde retourneert meerdere overeenkomende waarden met Filter
In Excel kunt u ook de filterfunctie gebruiken om dit probleem op te lossen.
1. Selecteer het kolombereik waarvan u de waarde wilt opzoeken en klik op Data > FILTER. Zie screenshot:
2. Klik vervolgens op de pijlknop in de eerste cel van je geselecteerde bereik en vink de waarde aan die je alleen wilt opzoeken in de vervolgkeuzelijst. Zie screenshot:
3. klikken OK, nu zie je alleen de opzoekwaarde en de bijbehorende waarden worden uitgefilterd.
Opzoekwaarde retourneert meerdere overeenkomstige waarden met gedefinieerde functie
Als u geïnteresseerd bent in Defined Function, kunt u het probleem ook oplossen met Defined Function.
1. druk op Alt + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.
2. klikken Module > Invoegen om een Module venster en kopieer de onderstaande VBA naar het venster.
VBA: opzoekwaarde retourneert meerdere overeenkomstige waarden.
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. Sluit het venster en typ deze formule in een cel = MyVlookup (A10, $ A $ 2: $ B $ 7,2) (A10 geeft de opzoekwaarde aan, $ A $ 2: $ B $ 7 geeft het gegevensbereik aan, 2 geeft het kolomindexnummer aan). En druk op Shift+Ctrl+Enter sleutels. Sleep vervolgens de vulgreep langs de cellen, plaats de cursor in het Formule balken druk op Shift+Ctrl+Enter weer.
Tip: Als u de waarden in horizontale cellen wilt retourneren, kunt u deze formule typen = MyVlookup (A10, $ A $ 2: $ B $ 7, 2, "h").
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!