mar10 <ma****@yahoo.comwrote in news:1187694763.941215.177040
@q3g2000prf.googlegroups.com:
i have TIME WORKED stored as minutes - I'd like to convert this to
days,hours,minutes.
I'm currently converting to hours and minutes but have not had
success adding the days portion to the formula below.
Any direction is greatly appreciated.
thanks
Format([TIME]\60,"0\:") & Format([TIME] Mod 60,"00")
Public Function Minutes2Duration(minutes as long) as string
Dim dd as integer, hh as integer, mm as integer
dd = minutes \ 1440
minutes = minutes - dd*1440
hh = minutes \ 60
mm = minutes mod 60
Minutes2Duration = format(dd,"000")&":" _
& format(hh,"00")&":" & format(mm, "00")
end function
--
Bob Quintal
PA is y I've altered my email address.
--
Posted via a free Usenet account from
http://www.teranews.com