Deel van celtekst overnemen

Hi,
Ik probeer een deel van een celtekst via een formule op te pakken.
Dat kan met DEEL, LINKS en RECHTS of VIND.SPEC maar probleem is
bij al deze formules dat ik niet weet hoeveel karakters te tekst heeft die ik wil oppakken.

Wèl weet ik dat NA de tekst een vaste variabele "/"staat, gevolgd door 2 letters en een minteken "-".
Dus hoe filter ik met een formule uit de volgende tekststring de 2 voornamen uit (bv in Cel B1 Jan en in Cel C1 Pieter):

VG/-HENDRIK/XG-JAN/VA-PIETER/LS-MARIE

Frans

Hoe weet je dat je JAN of PIETER moet hebben?
En hoe zit dat met HENDRIK in die string?

Ja, Hendrik en Marie ook. Het gaat om alle variabelen die na het minteken "-" beginnen
maar TOT de slash "/" (die de volgende reeks variablelen inluidt):


VG/-HENDRIK/XG-JAN/VA-PIETER/LS-MARIE

Frans

Kan je dit niet met Tekst naar Kolommen oplossen?

Ik zou daar niet moeilijk met formules mee gaan stoeien maar er een simple VBA functie voor maken:

Aanroep:
=ExtractNamen(A1;1)

Hierbij is 1 het nummer van de naam die je wilt hebben.
Voorbeeld:

...Tekst naar kolommen heb ik geprobeeerd er werkt goed, maar probleem is dat
bij het afsluiten van het bestand en het heropenen je weer opnieuw Tekst naar kolommen
met Optie / moet instellen. Bij het afsluiten wordt tekst naar kolommen niet opgeslagen.

Hiervoor wel een VBA ontvangen en die werkt ook (tekst naar kolommen wordt dan wel opgeslagen)
maar de VBA geeft continu pop-ups van foutmeldingen.

Daarom als alternatief het zoeken naar xx/- met de variabele erachter.

@edmoor: Ik krijg als output op de VBA #NAAM? in de cel te zien. De VBA staat goed opgeslagen,
in het juiste tabblad.

Doe ik iets fout met =ExtractNamen($A$1;1) ? De cel met alle variabelen is uiteraard wel A1.
Ook =ExtractNamen($A$1;2) en =ExtractNamen($A$1;3) geven #NAAM?

Frans

Dan heb je denk ik die VBA code niet in een module gezet.

Ah, yes, dat is het !! Nu werkt het!

Bedankt Edmoor

Frans

Een dergelijke functie moet altijd in een Module, niet achter het werkblad