Tekst naar kolommen vanaf rechts tot scheidingsteken "."

[Djezz]

Hallo,

ik zit te worstelen met een volgens mij relatief eenvoudig op te lossen vraagstuk..als volgt:
Ik heb een bestand met namen die als volgt zijn opgebouwd:

Dr. J. Riezebos
drs. A. Frik-Winselaar

Nu wil ik de achternaam in een aparte kolom hebben. Ofwel alle tekst tot de eerste "." van rechts.

Ik kom er niet uit. Wie weet raad?

alvast bedankt!

Jasper

 

[Niels28]

Als er altijd 2 punten in de naam staan.

=RECHTS(G13;LENGTE(G13)-VIND.SPEC(".";G13;VIND.SPEC(".";G13)+1))

Niels

 

[spaarie]

Volgens mij heb ik hem...dit is tot de eerste punt (zoals in je vraag)

=RECHTS(J9;VIND.SPEC(RECHTS(J9;VIND.SPEC(".";J9)+2);J9))

Alleen achternaam:

=RECHTS(J9;VIND.SPEC(RECHTS(J9;VIND.SPEC(".";J9)+4);J9))

 

[luibak]

Dit kan heel gemakklijk via tekst naar kolommen in excel zelf,

tab gegvens in excel 2010 en dan de functie tekst naar kolommen en dan de juiste gegevens bij scheidings tekens in vullen.
Ik heb hem zojusit met . en spatie gebruikt waar bij in 1 kolom de achter namen kwammen, de andere kolommen kan je gemakklijk verwijderen.

 

[Djezz]

helaas ben ik er nog niet met bovenstaande..er zijn namelijk nogal wat verschillende waarden in het bestand. Voor het hele bestand (1.800 records) wil ik enkel de achternaam tot de 1e punt vanaf rechts. Met bovenstaande krijg ik bij sommige waarden een juist maar bij andere waarden een onjuist resultaat. Voor de volledigheid bij deze een wat grotere selectie als voorbeeld:

H. Hegazy MSc
I. Doomernik MSc
J.H.C.M. Hermsen MSc
J.M.C.G. Ectors
K.B. Kistemaker MSc
L.F. van Weering MSc
M. Ghalit MSc
M. Kingma MSc
M.K. Ahmadi MSc
P.D. Vernooy MSc
P.J.M. Albers MSc
P.R. Brummelhuis MSc
R. Glimmerveen MSc
R. Huijssoon
R.J. van Scheijen MSc
R.L. Rousseau MSc
S.R. Saadat MSc
T. Hartman
T.J. Kanis
V.R.R Ramdat Misier MSc
W. Posthoorn MSc
Y. Belmalha
Dr. A.L.J. de Meere, MHA
Dr. A.P. ter Borg
Dr. G.S. Baldew
Dr. H.S. de Boer
Dr. J. Riezebos
Dr. J.H. de Neef
Dr. J.J. Tukker
Dr. N. Schurgers
Dr. P.J.J. Admiraal
Dr. P.M.J.M. Cornips
Dr. R. Heijnsbroek
Dr. R. van Hulten
Dr.Ir. J.H. Swarte
drs. A. Bouslous

 

[spaarie]

Dan zou ik het volgende doen.
CTRL+A > CTRL+F > klik de tab "zoeken EN VERVANGEN" > zoeken naar: geef een spatie > vervangen door bijv. ";" en vervolgens de functie tekst naar kolommen en als scheidingsteken ";" gebruiken.

 

[Djezz]

helaas..het enige dat je daarmee bereikt is het scheidingsteken "spatie" vervangen door ";". Dit lost het vraagstuk niet op. Tekst naar kolommen gaat vanaf links. Als tekst naar kolommen vanaf rechts mogelijk zou zijn dan zou het wel werken.

 

[Djezz]

ik heb m'n hersens al behoorlijk zitten breken over de criteria maar het enige dat zou werken is "tekst tot 1e . vanaf rechts". maar hoe dat in een formule om te zetten?

 

[Niels28]

met een UDF

Bekijk bijlage achternaam.xlsm


Niels

 

[Djezz]

Dag Niels,

dat is 'm! Zou ik zelf nooit hebben verzonnen. Mijn dank is groot!

grtn Jasper

 

[roeljongman]

met een beetje hulp van internet en VBA.

Ik heb een functie op internet gevonden die een celwaarde omdraait en daardoor de laatste als eerste ziet
je zult in jou bestand de volgende kode in een VBA module moeten zeten.

Function ZoekAchteruit(ByVal str As String) As String
    ZoekAchteruit = StrReverse(str)
End Function

en dan in excel de functie gebruiken

=RECHTS(A1;VIND.SPEC(".";ZoekAchteruit(A1))-2)

zie bijlage, voor zover ik kon zien werkt het..

 

[spaarie]

Djezz,

Als je vraag opgelost is, wil je deze dan ook markeren als opgelost?

Bij voorbaat dank!