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...
access kaava
Nimetön
7
984
Vastaukset
- 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ä.
Luetuimmat keskustelut
- 2043998
Tekisi niin mieli laittaa sulle viestiä
En vaan ole varma ollaanko siihen vielä valmiita, vaikka halua löytyykin täältä suunnalta, ja ikävää, ja kaikkea muuta m921906Miksi ihmeessä?
Erika Vikman diskattiin, ei osallistu Euroviisuihin – tilalle Gettomasa ja paluun tekevä Cheek301592- 1651402
Erika Vikman diskattiin, tilalle Gettomasa ja paluun tekevä Cheek
Erika Vikman diskattiin, ei osallistu Euroviisuihin – tilalle Gettomasa ja paluun tekevä Cheek https://www.rumba.fi/uut251276Pitääkö penkeillä hypätä Martina?
Eivätkö puistonpenkit ole istumista varten.Ei niitä kannata liata hyppäämällä koskaa likaantuvat eikä siellä kukaan niit2121150- 391132
Kuinka kauan
Olet ollut kaivattuusi ihastunut/rakastunut? Tajusitko tunteesi heti, vai syventyivätkö ne hitaasti?941109Maikkarin tentti: Orpo jälleen rauhallinen ja erittäin hyvä, myös Purra oli hyvä
Lindtman ja Kaikkonen oli kohtalaisia, sen sijaan punavihreät Koskela ja Virta olivat taas heikkoja. Ja vastustavat jalk1291093Milli-helenalla ongelmia
Suomen virkavallan kanssa. Eipä ole ihme kun on etsintäkuullutettu jenkkilässäkin. Vähiin käy oleskelupaikat virottarell1971026