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
- Hergebruik alles: Voeg de meest gebruikte of complexe formules, grafieken en al het andere toe aan uw favorieten en gebruik ze in de toekomst snel opnieuw.
- Meer dan 20 tekstfuncties: Nummer uit tekststring halen; Extract of verwijder een deel van teksten; Converteer cijfers en valuta's naar Engelse woorden.
- Tools samenvoegen: Meerdere werkmappen en bladen in één; Meerdere cellen / rijen / kolommen samenvoegen zonder gegevens te verliezen; Voeg dubbele rijen en som samen.
- Hulpmiddelen splitsen: Gegevens splitsen in meerdere bladen op basis van waarde; Eén werkmap naar meerdere Excel-, PDF- of CSV-bestanden; Eén kolom naar meerdere kolommen.
- Plakken overslaan Verborgen / gefilterde rijen; Tel en som op achtergrondkleur; Stuur gepersonaliseerde e-mails in bulk naar meerdere ontvangers.
- Superfilter: Maak geavanceerde filterschema's en pas deze toe op elk blad Sorteer per week, dag, frequentie en meer; Filteren door vetgedrukt, formules, commentaar ...
- Meer dan 300 krachtige functies; Werkt met Office 2007-2021 en 365; Ondersteunt alle talen; Eenvoudig te implementeren in uw onderneming of organisatie.
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 > Filteren. 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").
De beste tools voor kantoorproductiviteit
Kutools voor Excel lost de meeste van uw problemen op en verhoogt uw productiviteit met 80%
- visfuik: Snel invoegen complexe formules, grafieken en alles wat je eerder hebt gebruikt; Versleutel cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
- Super Formula-balk (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken in gefilterd bereik...
- Voeg cellen / rijen / kolommen samen zonder gegevens te verliezen; Gespleten cellen inhoud; Combineer dubbele rijen / kolommen... Voorkom dubbele cellen; Vergelijk Ranges...
- Selecteer Dupliceren of Uniek Rijen; Selecteer lege rijen (alle cellen zijn leeg); Super zoeken en fuzzy zoeken in veel werkboeken; Willekeurige selectie ...
- Exacte kopie Meerdere cellen zonder de formuleverwijzing te wijzigen; Maak automatisch verwijzingen naar meerdere bladen; Plaats kogels, Selectievakjes en meer ...
- Extraheer tekst, Tekst toevoegen, Verwijderen op positie, Ruimte verwijderen; Paging-subtotalen maken en afdrukken; Converteren tussen celinhoud en opmerkingen...
- Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerd sorteren per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
- Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
- Meer dan 300 krachtige functies. Ondersteunt Office / Excel 2007-2021 en 365. Ondersteunt alle talen. Eenvoudig te implementeren in uw onderneming of organisatie. Volledige functies Gratis proefperiode van 30 dagen. 60 dagen geld-terug-garantie.
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!
