• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Vertikaal zoeken, meerdere resultaten weergeven

Status
Niet open voor verdere reacties.
K

Khalid23

Gebruiker
Lid geworden
12 aug 2015
Berichten
48
Hallo Excel goeroes,

Wie kan me vertellen of het mogelijk is, (en hoe het moet) om via verticaal zoeken meerdere resultaten weer te geven. Ik heb een voorbeeldje bijgevoegd
Van de artikelen in blad 1 wil ik via vert.zoeken de planners en vestigingen hebben in een cel in blad2 (per artikel)
Ik hoop dat er iemand is die me kan helpen...

Groeten,
 

Bijlagen

  • Map111.xlsx
    11,4 KB · Weergaven: 42
Ik denk niet dat dat je gaat lukken op deze manier; met een macro zou het nog wel kunnen denk ik.
 
In het voorbeeld werkt dit:
Code: 
Sub tsh()
    Dim Br, Bq
    Dim i As Long
    
    Br = Sheets("Blad2").Range("B4").CurrentRegion
    With CreateObject("Scripting.Dictionary")
        For i = 2 To UBound(Br)
            Bq = .Item(Br(i, 1))
            If IsEmpty(Bq) Then
                Bq = Array(Br(i, 1), Br(i, 4), Br(i, 5))
            Else
                Bq(1) = Bq(1) & ", " & Br(i, 4)
                Bq(2) = Bq(2) & ", " & Br(i, 5)
            End If
            .Item(Br(i, 1)) = Bq
        Next
        Sheets("Blad1").Range("B5").Resize(.Count, 3) = Application.Index(.Items, 0)
    End With
End Sub

Maar je moet natuurlijk brongegevens in A1 laten beginnen.
 
Niet zo elegant als een VBA oplossing, maar met een hulpblad kom ik ook een heel eind. Bij een te groot aantal artikelen kan de sheet wel traag worden vermoed ik. Maar goed, bekijk maar eens... (zelf uit te breiden naar behoefte).
 

Bijlagen

  • Map111 (AC).xlsx
    17,1 KB · Weergaven: 61
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan