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

6846

    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. Martinan firma haastettiin käräjille

      Seiska: Martinan firma haastettiin käräjille, taustalla outo rahasotku.
      Kotimaiset julkkisjuorut
      390
      3181
    2. Veriteko Kajaanissa.

      Nuorta naista epäillään puukotuksesta. Väkivaltaisuus lisääntyy, eihän ole kauan kun kyse oli samanlaisesta teosta.
      Kajaani
      38
      2780
    3. Anna vihje jonka vain te tiedätte

      Tällä näkyy olevan monia etsijöitä ja kaipaajia. Otetaan ketju jossa voi antaa vihjeen. Kirjoittakaa jotain mitä muut e
      Ikävä
      172
      2136
    4. Miksi haluat satuttaa

      Sillä tiedolla ettet välittäisi minusta vaikka se ei ole totta. Silti tiedän että rakastat minua edelleen. Niinkuin sano
      Ikävä
      60
      1561
    5. Millaisiin naisiin miehet OIKEASTI hullaantuvat

      Kerrotaanpa nyt muutamia tosiasioita, joita miehet eivät yleensä halua myöntää ja joihin naiset usein haluavat olla usko
      Sinkut
      211
      1393
    6. Taitaa olla kaikki ohi

      Meidän väliltä.
      Ikävä
      95
      1143
    7. Olet kamalin ihminen mitä tiedän M

      Toivottavasti ei ikinä nähdä enää.
      Ikävä
      68
      1099
    8. Mikä sai sut

      Rakastumaan häneen ja miten pitkään siinä meni? Mikä nyt on tilanne?
      Ikävä
      88
      1074
    9. Mitä sanoisit jos uskaltaisin

      Avautua IRL ihan oikeasti? Mietin keinoja siihen koska en vain enää jaksa että meidän välit jatkuu näin. Tiedän ettet ha
      Ikävä
      69
      1020
    10. Farmi Suomi: Ari Koivunen tekee "ongelmallisen" päätöksen eläimille - Lloyd Libiso kieltää jyrkästi!

      Oho, heti “kriisiä” pukkaa Farmilla! Uusi kausi starttaa tv:ssä torstaina. Jaksaako Farmi Suomi kiinnostaa? Lue lisää,
      Tv-sarjat
      16
      985
    Aihe

    Tarvitsemme suostumuksesi tarjotaksemme personoitua palvelua

    Palvelu ja sen kolmannen osapuolen toimittajat (72) keräävät henkilötietoja (esim. IP-osoite tai laitetunniste) käyttäen evästeitä ja muita teknisiä keinoja tietojen tallentamiseen ja lukemiseen laitteellasi tarjotakseen sinulle tarkoituksenmukaisia mainoksia ja parhaan mahdollisen asiakaskokemuksen.

    Palvelu ja sen kumppanit tarvitsevat suostumuksesi seuraaviin:

    Tarkoitukset

    Tarkkoja sijaintitietoja ja laiteominaisuuksia koskevia tietoja voidaan käyttää.

    Mainonta voidaan yksilöidä profiilin perusteella. Toimintaasi tässä palvelussa voidaan käyttää sinua koskevan profiilin luomiseen tai parantamiseen yksilöityä mainontaa varten. Mainonnan suorituskykyä voidaan mitata.

    Sisältö voidaan yksilöidä profiilisi perusteella. Toimintaasi tässä palvelussa voidaan käyttää sinua koskevan profiilin luomiseen tai parantamiseen yksilöityä sisältöä varten. Sisällön tehokkuutta voidaan mitata. Raportit voidaan luoda oman ja muiden toiminnan perusteella. Toimintasi tässä palvelussa voi auttaa kehittämään ja parantamaan tuotteita ja palveluita.

    Evästeet, laitteet tai vastaavat verkkotunnisteet (esimerkiksi kirjautumisperusteiset tunnisteet, satunnaisesti määritetyt tunnisteet, verkkopohjaiset tunnisteet) sekä muut tiedot (esimerkiksi selaimen tyyppi ja tiedot, kieli, näytön koko, tuetut tekniikat jne.) voidaan tallentaa laitteellesi tai lukea laitteellasi laitteen tunnistamiseksi joka kerta, kun se muodostaa yhteyden sovellukseen tai verkkosivustoon yhdessä tai useammassa tässä esitetyssä tarkoituksessa.

    Erityisominaisuudet

    Hyväksynnälläsi tarkkaa sijaintiasi (alle 500 metrin säteellä) voidaan käyttää tässä ilmoituksessa kuvattujen tarkoitusten tueksi.

    Hyväksynnälläsi tiettyjä laitettasi koskevia ominaisuuksia saatetaan pyytää ja käyttää erottamaan se muista laitteista (kuten asennetut fontit tai laajennukset, näyttösi resoluutio) tässä ilmoituksessa kuvattujen tarkoitusten tueksi.

    Hyväksymällä sallit tietojesi käsittelyn. Suostumuksesi koskee tätä palvelua, hyväksymättä jättäminen voi vaikuttaa asiakaskokemukseesi. Jotkut teknologiat saattavat perustella tietojen käsittelyä oikeutetulla edulla, voit vastustaa tätä tai muuttaa muita asetuksia klikkaamalla Asetukset linkkiä.

    Tietosuoja