Henkilötunnus syntymäajaksi

Kvolgins

Osaisiko joku kirjoittaa kaavan, jolla saan muunnettua suomalaisen henkilötunnuksen syntymäajaksi eli esim. hetu 080381-308T muotoon 08.03.1981. Makrolla tehden on vähän raskas homma.

Ja sitten vielä kaava, joka laskisi henkilötunnuksen loppuosasta sukupuolen ja merkkaisi sen omaan sarakkeeseen MIES tai NAINEN. Sukupuolitietohan on yksilönumerossa, jotka ovat henkilötunnuksen loppuosan kolme ensimmäistä merkkiä. Viimeinen merkki on tarkistusmerkki. Esimerkissäni henkilö on siis nainen = 308.

7

6848

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • vois käyttää

      ainakin Even ja Odd toimintoja, Even eli parillinen luku (sukupuoli = nainen), Odd eli pariton luku (sukupuoli = mies).

      Siinä vaan sitten pitää jotenkin saada napsittua hetun loppuosasta se toiseksi viimeinen merkki, eli siis se merkki ennen tarkistusmerkkiä.

      Sitä en tiedä miten sen voisi tehdä, ehkä basicia käyttäen? Tosin en ole officen basic-variantin kanssa tehnyt koskaan mitään....tavallisessa basic-ohjelmoinnissa sen voisi tehdä niin että

      HETU$="080381-308T" ' ensin sijoitetaan HETU-merkkijonoksi
      L1=LEN(HETU$) ' mitataan HETU-merkkijonon pituus
      Sex$=Right$(HETU$, 2) ' otetaan HETU-merkkijonosta kaksi viimeistä merkkiä ja sijoitetaan SEX-merkkijonoon

      Sex$=Left$(Sex$,1) ' napsitaan SEX-merkkijonon joka on 2 merkkiä pitkä, vasemmanpuoleinen merkki joka ilmaisee sukupuolen

      S1=CVI(Sex$) ' muunnetaan 1 mrk pitkä merkkijono numeroksi

      ---

      Tuota samaa kaavaa voisi noudattaa myös syntymäajan purkamisessa niin että se...hetkinen...ehkäpä myös Format-käsky voisi tulla kyseeseen. HUOM! Format ei Basic-kielessä tarkoita levyn formatointia vaan merkkijonojen "formatointia" elikkä uudelleen muotoilua! Eli on turhaa kuvitella että Basicin Formatilla pystyisi alustamaan levyjä. :D Format-käskyä voidaan käyttää esim. päivämäärien muotoilussa.

      Google selventää tarkemmin kun haet kyseistä käskyä ja laitat hakusanan perään vielä basic

      • Kvolgins

        jotain tuon suuntaista olen yrittänyt vääntää, mutta ei ole oikein onnistunut. Jatkan harjoituksia.


    • koetat vaikka

      näillä
      =LEFT(A1;2)&"."&MID(A1;3;2)&"."&IF(MID(A1;7;1)="-";"19";IF(MID(A1;7;1)=" ";"18";"20"))&MID((A1);5;2)
      =IF(ISEVEN(MID(A1;8;3));"Nainen";"Mies")

      • ei sitten

        varmaan toimineet...ei ole kommentteja näkynyt...


      • Jani1818

        hyvin toimi tuo =IF(ISEVEN(MID(A1;8;3));"Nainen";"Mies"), kiitos!


    • Hki_kaupunki

      =JOS((ONPARILLINEN(E506))=TOSI;"Nainen";"Mies")
      Kaavasta E506 korvataan sillä solulla, jossa hetu on.

    • aivot_solmussa

      Jos joku tätä yrittää tehdä, niin tässä kaava suomenkieliseen:
      =JOS(ONPARILLINEN(POIMI.TEKSTI(D1898;8;3));"nainen";"mies")
      Tuo D1898 on solu, jossa HETU on.

    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Kelkkailijat

      Oliko kelkkailijat ähtäriläisiä.
      Ähtäri
      22
      3522
    2. Kyllä mä sua rakastan mutta ei me voida olla me

      On tuhat syytä miksei vaan voida olla. Pitää sunkin hyväksyä se . Parempi kun ei nähdäkään enää, sattuu liikaa. Naiselle
      Ikävä
      104
      1704
    3. Mikset laita viestiä?

      Sille sun ikävän kohteelle?
      Ikävä
      104
      1328
    4. Tiesitkö mies että musta tulee sun vaimo?

      Niinpä, aika järisyttävä uutinen
      Ikävä
      66
      1064
    5. Manipuloitu Raamattu

      Manipuloitu Raamattu https://www.youtube.com/watch?v=XOZ4C8qWWrQ Tässä leikkaamattomassa videossa Mauro Biglino käsitte
      Hindulaisuus
      317
      1002
    6. Jos sattumalta

      kohdataan ja näet että minäkin näen sut niin a. lähdetkö pois b. sanot hei tai muuta c. katsot hiljaa ja odotat mitä
      Ikävä
      71
      941
    7. Kertokaapa miehet

      Nyt sitten minkälainen nainen on mieleenne? Tuli siis mieleen tuosta toisesta aloituksesta. Jossa nainen ei saisi olla l
      Sinkut
      143
      935
    8. Lähtee järki sun kanssa mies

      Mitä ihmettä sä minusta haluat? Ole rehellinen, ei tätä kestä erkkikään.
      Ikävä
      60
      912
    9. Martina instassa kehuu omia nuorekkaita kasvojaan..

      Kyllä on sitten nuorekas,not! Täynnä täytaineita tämä nainen ja näyttää joka päivä enemmän samalta kun joku naisista B
      Kotimaiset julkkisjuorut
      151
      856
    10. Kerrohan minulle nainen viisain

      Että mikä minun ongelma oikeasti on?
      Ikävä
      67
      842
    Aihe