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
7
1032
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
- 694327
- 664002
Kiva kun SDP alkaa hallitsemaan Suomea
Vanhat hyvät ajat taas palaavat ja kansa vaurastuu. Muistatteko vielä Sorsan aikakauden? Silloin Suomessa tehtiin jopa1143843SDP:n lyhyt selviytymisopas
1. Komitea on vastaus, oli kysymys mikä tahansa Jos maailma on muuttumassa tai jossain palaa, demari ei hätiköi. Ensin p753194- 863132
- 632377
Keskisen kyläkaupassa Temun vaatteita myynnissä?
Siis mitä? Miksi siis ei itse tilaisi Temusta samoja.621756Nanna Karalahti :Paljastus bisneksistä Jere Karalahden kanssa!
Ottanut yhteyttä seiskalehden toimittajaan ja kertonut totuuden yhteisestä Herotreeni-nimisestä verkkovalmenuksesta.1281223SÄ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ähk2131215Mitä se olisi
Jos sinä mies saisit sanoa kaivatullesi mitä vain juuri nyt. Ilman mitään seuraamuksia yms. Niin mitä sanoisit?411215