Mitenköhän excelillä lasketaan kahden päivämäärän
välinen aika vuosina, kuukausina ja päivinä, siis
tarkkaan esim. työsuhteen pituus?
välinen aika vuosina, kuukausina ja päivinä, siis
tarkkaan esim. työsuhteen pituus?
excel kalenteri
kaitschu
12732
0Äänestä
Muut lukivat myös
Odottaa vastausta
Näihin keskusteluihin ei ole vielä vastattu. Ole ensimmäinen.
Vastaukset 12
Vanhimmat
Yritin monella konstilla, Mutta ei onnistu. Excel ei näköjään ymmärrä että on olemassa
15 vuotta 0 kuukautta ja 1 päivä
1.2.2003-1.2.1988= 14v 12kk 31p
2.2.2003-1.2.1988= 15v 01kk 01p
Taitaa olla helpointa laskea vuorokausina
Vaan vuosissa on eri määrä päiviä, kuukausista puhumattakaan. Mitataanko kalenterivuosia ja -kuukausia vai esim. 360/30?
Siis tarkkaan vuodet, kuukaudet ja päivät, kyllä
excelissä pitäis olla kaikki vuodet ohjelmoituna
tarkkaan erikseen.Esim. 1.8.1990-23.10.2003 =
13 v 2 kk 23 p
jos excelillä laskee mainitsemasi laskun antaa se vastauksen 13v 3kk 23p, elikkä kuukauden liikaa. Vuorokausina antaa 4831, on oikein.
käytä funktioita vuosi, kuukausi ja päivä ja laske noiden erotus. Päiviin lisää 1 niin saat mainitsemasi tuloksen
Niin joo, ei se ihan noin helposti menekään. Tulipa kiirehdittyä...
Hm.. takaisin piirustusten ääreen ;)
Mutta VB pelastaa:
Public Function Pvmerotus(pvm1 As Date, pvm2 As Date) As String
Dim paivatkaikki As Long
Dim vuodet As Long
Dim kuukaudet As Long
Dim paivat As Long
Dim i As Integer
Dim kv As Integer
kv = 0
For i = Year(pvm1) To Year(pvm2)
If (i Mod 4 = 0) And (i Mod 100 0) Or (i Mod 4 = 0) And (i Mod 400 = 0) Then
kv = kv 1
End If
Next
paivatkaikki = pvm2 - pvm1
vuodet = Int((paivatkaikki - kv) / 365)
kuukaudet = Month(pvm2) - Month(pvm1)
If kuukaudet < 0 Then
kuukaudet = 12 kuukaudet
End If
paivat = Day(pvm2) - Day(pvm1)
If (paivat < 0) Then
kuukaudet = kuukaudet - 1
End If
If kuukaudet = 0 Then
paivat = (pvm2 - pvm1 - kv) Mod 365
End If
Pvmerotus = vuodet & " v " & kuukaudet & " kk " & paivat & " pv"
End Function
Pitäisi toimia, muutamilla päivämäärillä testasin hyvin näytti toimivan. Takuuseen en silti mene...
Miten tuota sinun funktiota käytetään excelissä?
1. mene VB-editoriin (alt f11)
2. lisää moduuli (Insert -> module)
3. copy-pastaa koodi akkunaan
4. pistä pari päivämäärää excel:n soluihin (vaikka aikaisempi a1:een ja myöhempi a2:een)
5. pistä johonkin soluun kaava =PVMEROTUS(A1;A2)
tuo oma funktio löytyy kyllä muiden funktioiden joukosta (käyttäjän määrittämistä)
25.10.2001-25.10.2003 = 2v 0kk 0pv
26.10.2001-25.10.2003 = 1v -1kk -1pv
No, enpä väittänyt että se 100% toimisi. Väänsin sen puolinukuksissa tyyliin antaa palaa... ;)
No, on siinä nyt jotain, mistä jatkaa
Päivämäärät on vähän hankalia laskea, mutta yritetään:
laita soluun B9 työsuhteen alkamispäivä
soluun C9 työsuhteen loppumispäivä
soluun E9 =PVMERO(B9-1;C9;"Y")
soluun F9 =PVMERO(B9-1;C9;"M")-E9*12
soluun G9 =ITSEISARVO(PVMERO(B9-1;C9;"MD"))
solujen E9, F9 ja G9 muotoiluihin luku;yleinen.
E9 näyttää vuodet
F9 kuukaudet
G9 päivät
Nyt voit laittaa soluihin B9 ja C9 mitä vain päivämääriä kunhan C9 on isompi.
laskee kuukauden täyttymisen ja päivät edellisen täyden kuun mukaan. esim:Kuukausi täyttyy helmikuussa pitää olla 31 päivää kuten tammikuussa.
Jos et saa tästä mitään tolkkua, voin lähettää sullu valmiin taulukon sähköpostina.