access kaava

Nimetön

Access-tietokannassa on henkilöryhmä, josta tiedetään syntymäajat. Kuinka lasketaan kunkin henkilön ikä muodossa pp.kk.vv ja koko ryhmän keski-ikä? Ohjeet mielellään täydellisen aloittelijankin ymmärtämässä muodossa, kiitos...

7

1032

Äänestä

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • mmm

      Lisää kyselyn rakennenäkymään taulu, jossa on ne syntymäajat. Raahaa sarakeruudukkoon henkilön nimi. Lisää laskettu kenttä IKA: Date()-[SyntAika]. Laita kenttämuotoiluksi 'vv.kk.pp'

      Luo toinen kysely laskeaksesi keski-iän. Lisää rakennenäkymässä jälleen taulu, jossa on syntymäajat. Lisää pelkkä laskettu kenttä IKA: Date()-[SyntAika]. Paina työkalurivin 'Näytä Summat'-painiketta ja valitse 'Summat:'-riville laskentamuodoksi 'Keskiarvo'. Laita kenttämuotoiluksi 'vv.kk.pp'

      Näin saat iän suurinpiirtein. Todellisen iän laskemiseen tarvitaan funktiota.

      • Nimetön

        Kiitos vastauksesta. Kerros vielä mihin tuossa ekassa kyselyssä laitetaan tuo muotoilumääritys? En löydä mitään "muotoilu-määritys-kenttää"...

      • mmm
        Nimetön kirjoitti:

        Kiitos vastauksesta. Kerros vielä mihin tuossa ekassa kyselyssä laitetaan tuo muotoilumääritys? En löydä mitään "muotoilu-määritys-kenttää"...

        Klikkaa rakennenäkymässä kenttäruudukossa haluamaasi kenttää (sitä laskettua) hiiren kakkospainikkeella, valitse ponnahdusikkunasta 'Ominaisuudet'.

        Ominaisuudet-ikkunassa on kenttämuotoilun valinta ('Muoto').

      • Nimetön
        mmm kirjoitti:

        Klikkaa rakennenäkymässä kenttäruudukossa haluamaasi kenttää (sitä laskettua) hiiren kakkospainikkeella, valitse ponnahdusikkunasta 'Ominaisuudet'.

        Ominaisuudet-ikkunassa on kenttämuotoilun valinta ('Muoto').

        Kiitos,nyt toimii. Tuo "suurinpiirtein" tarkkuuskin riittää mainiosti.

      • Nimetön
        mmm kirjoitti:

        Klikkaa rakennenäkymässä kenttäruudukossa haluamaasi kenttää (sitä laskettua) hiiren kakkospainikkeella, valitse ponnahdusikkunasta 'Ominaisuudet'.

        Ominaisuudet-ikkunassa on kenttämuotoilun valinta ('Muoto').

        "Nälkä kasvaa syödessä" eli viitsisitkö vielä antaa sen tarkan kaavan tai funktion, mikä sitten lieneekään, jolla saa täsmällisen tuloksen....tuo edellinenhän näyttää antavan yhden kuukauden liikaa...

      • mmm
        Nimetön kirjoitti:

        "Nälkä kasvaa syödessä" eli viitsisitkö vielä antaa sen tarkan kaavan tai funktion, mikä sitten lieneekään, jolla saa täsmällisen tuloksen....tuo edellinenhän näyttää antavan yhden kuukauden liikaa...

        Moduliin funktio:

        Public Function Ika(dSP As Date, Optional dPvm As Date = 0) As Date
        ' Välitetään parametreina syntymäpäivä, haluttaessa loppupäiväys
        ' Palauttaa päivämäärämuodossa iän
        Dim iV As Integer, iK As Integer, iP As Integer, dTmp As Date
        If dPvm = 0 Then dPvm = Date
        iV = DateDiff("yyyy", dSP, dPvm)
        If dSP > DateSerial(Year(dSP), Month(dPvm), Day(dPvm)) Then iV = iV - 1
        dTmp = DateSerial(Year(dSP) iV, Month(dSP), Day(dSP))
        iK = DateDiff("m", dTmp, dPvm)
        If Day(dPvm) < Day(dSP) Then iK = iK - 1
        dTmp = DateAdd("m", iK, dTmp)
        iP = DateDiff("d", dTmp, dPvm)
        Ika = DateSerial(1900 iV, iK, iP)
        End Function

        Kyselyn rakennenäkymään kenttäruudukkoon: IKA: =Ika([SyntAika])

      • Nimetön
        mmm kirjoitti:

        Moduliin funktio:

        Public Function Ika(dSP As Date, Optional dPvm As Date = 0) As Date
        ' Välitetään parametreina syntymäpäivä, haluttaessa loppupäiväys
        ' Palauttaa päivämäärämuodossa iän
        Dim iV As Integer, iK As Integer, iP As Integer, dTmp As Date
        If dPvm = 0 Then dPvm = Date
        iV = DateDiff("yyyy", dSP, dPvm)
        If dSP > DateSerial(Year(dSP), Month(dPvm), Day(dPvm)) Then iV = iV - 1
        dTmp = DateSerial(Year(dSP) iV, Month(dSP), Day(dSP))
        iK = DateDiff("m", dTmp, dPvm)
        If Day(dPvm) < Day(dSP) Then iK = iK - 1
        dTmp = DateAdd("m", iK, dTmp)
        iP = DateDiff("d", dTmp, dPvm)
        Ika = DateSerial(1900 iV, iK, iP)
        End Function

        Kyselyn rakennenäkymään kenttäruudukkoon: IKA: =Ika([SyntAika])

        ...mutta taidanpa kuitenkin tyytyä tuohon suurinpiirtein arvoon...kiitti kuiteskin.

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

    Takaisin ylös

    Luetuimmat keskustelut

    1. Rakas

      Eihän se tietysti minulle kuulu, mutta missä sinä olet? 😠
      Ikävä
      69
      4327

    2. Pidit itseäsi liian

      Vanhana minulle? Niinkö?
      Ikävä
      66
      4002

    3. Kiva kun SDP alkaa hallitsemaan Suomea

      Vanhat hyvät ajat taas palaavat ja kansa vaurastuu. Muistatteko vielä Sorsan aikakauden? Silloin Suomessa tehtiin jopa
      Maailman menoa
      114
      3843

    4. SDP:n lyhyt selviytymisopas

      1. Komitea on vastaus, oli kysymys mikä tahansa Jos maailma on muuttumassa tai jossain palaa, demari ei hätiköi. Ensin p
      Maailman menoa
      75
      3194

    5. Joko olet luovuttanut

      Mun suhteen?
      Ikävä
      86
      3132

    6. Haluaisitko oikeasti

      Vakavampaa välillemme vai tämäkö riittää
      Ikävä
      63
      2377

    7. Keskisen kyläkaupassa Temun vaatteita myynnissä?

      Siis mitä? Miksi siis ei itse tilaisi Temusta samoja.
      Maailman menoa
      62
      1756

    8. Nanna Karalahti :Paljastus bisneksistä Jere Karalahden kanssa!

      Ottanut yhteyttä seiskalehden toimittajaan ja kertonut totuuden yhteisestä Herotreeni-nimisestä verkkovalmenuksesta.
      Kotimaiset julkkisjuorut
      128
      1223

    9. SÄHKÖLASKU 1600 EUROA Ei tässä ole mitään järkeä

      https://www.is.fi/taloussanomat/art-2000011804443.html Kyllä täysin huijausta nämä sähkömarkkinat. Varsinkin pörssisähk
      Maailman menoa
      213
      1215

    10. Mitä se olisi

      Jos sinä mies saisit sanoa kaivatullesi mitä vain juuri nyt. Ilman mitään seuraamuksia yms. Niin mitä sanoisit?
      Ikävä
      41
      1215
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt