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
948
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
- 881184
Asiallinen lähestyminen
Mitä on asiallinen lähestyminen?? Tietääkö tai tajuaako kukaan, varsinkaan miehet??? Eilen NELJÄNNEN kerran jouduin isk1511016En tiedä..
Yhtään minkälainen miesmaku sinulla on. itse arvioin sinua moneenkin otteeseen ja joka kerta päädyin samaan lopputulokse50701Jennika Vikman avoimena - Isosisko Erika Vikman ohjeisti napakasti Tähdet, tähdet -kisaan: "Älä.."
Jennika ja Erika - niin ovat kuin kaksi marjaa! Ilmeiltään, ääneltään ja eleiltään hyvinkin samanlaiset - toinen on kyll14700Vedalainen metafysiikka
Termi ”metafysiikka” kuuluu Aristoteleelle. Metafysiikka tarkoittaa ”fysiikan jälkeen” eli tietoa siitä, mikä on tavalli287685- 60674
Ai jaa sinä oletkin ahnas
Ja romanttinen luonne, nyt vasta hiffasin että olet naarastiikeri. Parempi myöhään kuin ei milloinkaan.107660En oikeastaan usko että sinä tai kukaan
Olisi oikeasti ihastunut tai rakastunut. Se on joku harhakuva joka minusta miehestä syntyi. Ja kun se särkyy, niin "tunt42614Viime yönä mietin paikkoja luonnossa, missä olen kulkenut
kävellyt ja ikävöinyt, ja ollut niin yksin. Monet kerrat. Ne palauttavat mieleeni sinut ja sen, kuinka kipeää on se kaip57602Milloin viimeksi näit ikäväsi kohteen?
Oliko helppo tunnistaa hänet? Millaisia tunteita tuo näkeminen herätti sinussa?35585