Lijst

[Bouwer91]

Goedemorgen,

M.b.t. het bijgevoegde bestand heb ik de volgende vraag: in blad 1 kan ik nu in cel E2 aan de hand van een invoer heel makkelijk een naam selecteren waarnaar ik op zoek ben. Bijvoorbeeld, als ik op zoek ben naar de Jermain, dan typ ik in cel E2 bijvoorbeeld "ai" in en hij verschijnt in de tekstbox onder cel E2. Vervolgens dubbelklik ik op zijn naam en zijn naam wordt overgenomen in cel C2.

Dit wil ik nu ook kunnen doen in blad 2. Dus als ik in blad 2 in cel E2 bijvoorbeeld "eo" typ, dan moet hij alle namen laten zien in het tekstbox die "eo" bevatten. Echter, op één of andere manier pakt hij dit niet.

Ik heb wat dingen geprobeerd, maar kom er niet uit. Ik heb in blad 3 al wel een extra kolom in kolom F toegevoegd waarvan ik denk dat die nodig is om het genoemde probleem op te lossen. Het zit hem waarschijnlijk in de macro.

Wie kan mij helpen om dit probleem op te lossen?

Vriendelijke groet

 

[Bouwer91]

Excuses, maar dit is de juiste bijlage.

 

[VenA]

Je hebt de listbox gekoppeld aan het bereik 'naam'. Deze verwijst naar kolom E. Je zal dus een nieuw bereik moeten koppelen.

Je kan het geheel ook gelijk met VBA afhandelen.

 

[Bouwer91]

Bedankt, VenA!!

 

[popipipo]

Via bv advanced filter kun je de lijst nog ontdoen van dubbele namen dat scheelt ca 100 namen

 

[Bouwer91]

VenA,

Ik probeerde de benaming van de werkbladen aan te passen, maar dan pakt hij voert hij de macro niet meer uit. Weet jij hoe ik dit goed kan zetten?

Ik weet waar ik in VBA de benaming van de werkbladen moet aanpassen, maar hij geeft ook aan dat er een fout dan zit in de textbox welke mij niet lukt om op te lossen.

In de bijlage heb ik het nieuwste bestand toegevoegd.

Vriendelijke groeten

 

[VenA]

Je ziet toch welke regel er geel kleurt? Waar zal het dan fout gaan?

ar = Sheets("3").ListObjects(1).DataBodyRange

ar = Blad3.ListObjects(1).DataBodyRange

ar =Sheets("PERSONEEL").ListObjects(1).DataBodyRange

Zit jouw Capslock soms vast? Alles met hoofdletters bijzonder net als al die dubbele namen.

 

[Bouwer91]

Bedankt! Ik ga het doorvoeren.

De achternamen heb ik uit het bestand gelaten. Vandaar dat je dubbele voornamen ziet ;-)