Tekstin poimiminen

Nimet ovat tosiaan kaksi osaisia joten toinen osa jää pois. Olisiko mahdollista että se tutkisi listan jossa se kävisi läpi sukunimet, kun niitähän ei ole kuin se 20kpl.

Jakke kirjoitti:

Nimet ovat tosiaan kaksi osaisia joten toinen osa jää pois. Olisiko mahdollista että se tutkisi listan jossa se kävisi läpi sukunimet, kun niitähän ei ole kuin se 20kpl.

Eikös kaksiosaiset sukunimet kirjoiteta väliviivalla. Silloinhan tuon pitäisi toimia. (Poikkeuksena tosin jotkut "von Hertzen"-tyyppiset nimet)

Lisäisin tuon funktion loppupuolelle vielä "-1", niin se välilyönti ei tule mukaan:

=POIMI.TEKSTI(A1;1;KÄY.LÄPI(" ";A1)-1)


- Mika

Jakke kirjoitti:

Nimet ovat tosiaan kaksi osaisia joten toinen osa jää pois. Olisiko mahdollista että se tutkisi listan jossa se kävisi läpi sukunimet, kun niitähän ei ole kuin se 20kpl.

Jos nimi on muodossa
Koski-Vähälä Reino
tuo kaava toimii, Mutta jos nimi on muodossa
Rantala Kamunen Tuula
poimii vain Rantala.
Millaisessa muodossa niitä on.

Mika kirjoitti:

Eikös kaksiosaiset sukunimet kirjoiteta väliviivalla. Silloinhan tuon pitäisi toimia. (Poikkeuksena tosin jotkut "von Hertzen"-tyyppiset nimet)

Lisäisin tuon funktion loppupuolelle vielä "-1", niin se välilyönti ei tule mukaan:

=POIMI.TEKSTI(A1;1;KÄY.LÄPI(" ";A1)-1)


- Mika

Suurin osa on kyllä normaaleja sukunimiä, mutta löytyy myös noita saksalaisia nimiä Von, Dam, yms.

paavali kirjoitti:

Jos nimi on muodossa
Koski-Vähälä Reino
tuo kaava toimii, Mutta jos nimi on muodossa
Rantala Kamunen Tuula
poimii vain Rantala.
Millaisessa muodossa niitä on.

Ilman väliviivaa. Nyt toteutin sen niin että C-sarakkeessa on seuraava kaava:
=JOS(B1="Herzen";KETJUTA(B1;" Von");JOS(B1="Dam";KETJUTA(B1;" Van");B1))

En nyt ihan tarkaan muista montako ikävää sukunimi muunnosta löytyy mutta ei niitä montaa ollut.

Jakke kirjoitti:

Ilman väliviivaa. Nyt toteutin sen niin että C-sarakkeessa on seuraava kaava:
=JOS(B1="Herzen";KETJUTA(B1;" Von");JOS(B1="Dam";KETJUTA(B1;" Van");B1))

En nyt ihan tarkaan muista montako ikävää sukunimi muunnosta löytyy mutta ei niitä montaa ollut.

se onnistuu, Mutta ei onnistu ilman -1, josta Mika jo mainitsi.

paavali kirjoitti:

se onnistuu, Mutta ei onnistu ilman -1, josta Mika jo mainitsi.

Lisää moduuli ja sinne funktio

Function Sukunimi(Teksti As String)
Dim i As Integer
Dim sana As String
i = 1
Do Until sana Like (" *")
sana = Right(Teksti, i)
i = i 1
Loop
Sukunimi = Left(Teksti, Len(Teksti) - Len(sana))
End Function

sitten liitä funktio nappulalla haet sukunimi funktion tai kirjoitat suoraan soluun
=Sukunimi(A1) ja kopioit alas
:)Kunde

Kunde kirjoitti:

Lisää moduuli ja sinne funktio

Function Sukunimi(Teksti As String)
Dim i As Integer
Dim sana As String
i = 1
Do Until sana Like (" *")
sana = Right(Teksti, i)
i = i 1
Loop
Sukunimi = Left(Teksti, Len(Teksti) - Len(sana))
End Function

sitten liitä funktio nappulalla haet sukunimi funktion tai kirjoitat suoraan soluun
=Sukunimi(A1) ja kopioit alas
:)Kunde

Täytyy kokeilla kaikki mahdolliset ja mahdottomat tapaukset. Niin huomasin ettei toimi kunnolla.
Jos on nimi Virtanen Maija Liisa ilman väliviivaa niin tulos on Virtanen Maija.

Jakke kirjoitti:

Täytyy kokeilla kaikki mahdolliset ja mahdottomat tapaukset. Niin huomasin ettei toimi kunnolla.
Jos on nimi Virtanen Maija Liisa ilman väliviivaa niin tulos on Virtanen Maija.

Tämä nyt tässä vaihessa enää paljon auta, mutta kuitenkin...

Taitaa olla varmin kosnti se, että tietojen tallennus vaiheessa käyttää noissa sukunimissä vaikka alaviivaa tyyliin von_Hertzen, ja poistaa "ala-apuviivat" sitten kun tietoja esitetään.


- Mika

Mika kirjoitti:

Eikös kaksiosaiset sukunimet kirjoiteta väliviivalla. Silloinhan tuon pitäisi toimia. (Poikkeuksena tosin jotkut "von Hertzen"-tyyppiset nimet)

Lisäisin tuon funktion loppupuolelle vielä "-1", niin se välilyönti ei tule mukaan:

=POIMI.TEKSTI(A1;1;KÄY.LÄPI(" ";A1)-1)


- Mika

Entäpä jos haluan sen loppu osan välilyönnin jälkeen C soluun?

MSK kirjoittaa
"Tämä tutkii mahdollisen toisen välilyönnin, joten poimii kaksiosaisen sukunimen, mutta ei toimi tälläisenään, jos etunimistäkin löytyy välilyöntejä eli on kaksiosaisia etunimiä (siinä tapauksessa poimii myös ensimmäisen etunimen, jos sukunimessä ei välilyöntiä). pienellä jatkojalostuksella saisi tuonkin tutkittua."

Tuon pienen jatkojalostuksen haluan minäkin nähdä...
tehtävässähän ei ole mitään muuta vaikeutta kuin kaksi välilyöntiä, eli tapaukset
1. kaksiosainen sukunimi ja välilyönnillä erotettu nimi ja
2. välilyönillä erotettu sukunimi ja kaksiosainen etunimi

Miten ihmeessä MSK aiot selvittää kumpiko tapaus on kyseessä?

:)Kunde

Kunde kirjoitti:

MSK kirjoittaa
"Tämä tutkii mahdollisen toisen välilyönnin, joten poimii kaksiosaisen sukunimen, mutta ei toimi tälläisenään, jos etunimistäkin löytyy välilyöntejä eli on kaksiosaisia etunimiä (siinä tapauksessa poimii myös ensimmäisen etunimen, jos sukunimessä ei välilyöntiä). pienellä jatkojalostuksella saisi tuonkin tutkittua."

Tuon pienen jatkojalostuksen haluan minäkin nähdä...
tehtävässähän ei ole mitään muuta vaikeutta kuin kaksi välilyöntiä, eli tapaukset
1. kaksiosainen sukunimi ja välilyönnillä erotettu nimi ja
2. välilyönillä erotettu sukunimi ja kaksiosainen etunimi

Miten ihmeessä MSK aiot selvittää kumpiko tapaus on kyseessä?

:)Kunde

Joo... tajusin tuon välittömästi kirjoitettuani edellisen viestini. Kai toivoin, että kukaan ei tuota mokaa huomaisi... Aika mahdotonta on ilman sanakirjalla varustettua massiivista ohjelmaa selvittää kolmesta peräkkäisestä sanasta, mikä on sukunimeä ja mikä etunimeä.
Ajattelin tuossa kai sitä, että mahdollisen kolmannenkin välilyönnin voisi ottaa kaavassa huomioon...