Excel desimaalit sekä ajat

Sitten vielä:

Iltavuoro on 16-20 ja 21-> yövuoro. Miten saan iltavuorosarakkeen laskemaan vain ensimmäiset neljä tuntia maksimissaan?

Pyöristä 15min tarkkuudella (LibreOffice Calc)

08:07:23 PYÖRISTÄ.KERR(A1;"0:15") 08:00:00
08:08:23 PYÖRISTÄ.KERR(A2;"0:15") 08:15:00

Jos solussa A1 on luku 1,62

Pyöristää seuraavaan 0,25:een:
=CEILING(A1;0,25)
1,75

Pyöristää lähimpään 0,25:een:
=ROUND(A1*4)/4
1,50

Funktiosolun muotoilu pitää olla kahdella desimaalilla.

Jos vastaus on negatiivinen, niin
=JOS(A1<0;"";PYÖRISTÄ.KERR(A1;0,25)) - nyt solu jää tyhjäksi jos A1 on negatiivinen. Jos haluat nollan jäävän näkyviin niin vaihda lainausmerkkien tilalle nolla.

Kellon ajalle voi tehdä myös oman funktion.

Function pyoristaPaiva(paiva As Date) As Date
Dim minuutit As Integer: minuutit = Format(paiva, "nn")
Dim korjatutMinuutit As Integer
If minuutit Mod 15 > 7 Then
korjatutMinuutit = minuutit ((((minuutit \ 15) 1) * 15) - minuutit)
Else
korjatutMinuutit = minuutit - minuutit Mod 15
End If
If Not (korjatutMinuutit = 60) Then
pyoristaPaiva = CDate(Format(paiva, "hh") & ":" & korjatutMinuutit)
Else
pyoristaPaiva = CDate(DateAdd("h", 1, Format(paiva, "hh") & ":00"))
End If
End Function

Esimerkki: =PYORISTAPAIVA(solu)

aika pyöristetty
15:00 15:00
15:02 15:00
15:04 15:00
15:06 15:00
15:08 15:15
15:10 15:15
15:12 15:15
15:14 15:15
15:16 15:15
15:18 15:15
15:20 15:15
15:22 15:15
15:24 15:30
15:26 15:30
15:28 15:30
15:30 15:30
15:32 15:30
15:34 15:30
15:36 15:30
15:38 15:45
15:40 15:45
15:42 15:45
15:44 15:45
15:46 15:45
15:48 15:45
15:50 15:45
15:52 15:45
15:54 16:00
15:56 16:00
15:58 16:00
16:00 16:00