jwcolby
jwcolby at colbyconsulting.com
Sun Nov 14 20:05:44 CST 2010
'
'1440
'____ = 5 minute round
'X
Function RoundTime(vRoundTime As Date) As Date
'Const cintMult As Integer = 96 '15 minute round
'Const cintMult As Integer = 144 '10 minute round
Const cintMult As Integer = 288 '5 minute round
RoundTime = CVDate(Int(vRoundTime * cintMult + 0.5) / cintMult)
End Function
--
John W. Colby
www.ColbyConsulting.com