Time conversion and calculation

[Guest]

I have a time field with values from 2 to 3 digits long, representing duration values; for example

30 (which equals 30 minutes
100 (which equals 1 hour
130 (which equals 1 hour 30 minutes
etc

I need to calculate the number of quarter-hours (15-minute intervals) within each of these values, and am at a loss on how to do this. I've contemplated dividing the field into two separate fields, but run into a problem extracting the hour digit since not every value has three digits (not to mention the result would be a text field that would prevent calculations). I am not familiar with VBA and how to create macros, so I'm pretty much limited to functions. Any help would be greatly appreciated

Thanks
Eric

 

[Douglas J. Steele]

You can use the Format function to convert both your 2 and 3 digit
durations to 3 digit strings:

strValue = Format(intValue, "000")

Now, you can extract the first digit as hours, and the 2nd and 3rd digits as
minutes:

intHours = CInt(Left(strValue, 1))
intMinutes = CInt(Right(strValue, 2))

That last one could also be

intMinutes = CInt(Mid(strValue, 2))

Hopefully that's enough to get you going.

--
Doug Steele, Microsoft Access MVP

(No private e-mails, please)

I have a time field with values from 2 to 3 digits long, representing duration values; for example:

30 (which equals 30 minutes)
100 (which equals 1 hour)
130 (which equals 1 hour 30 minutes)
etc.

I need to calculate the number of quarter-hours (15-minute intervals)

within each of these values, and am at a loss on how to do this. I've
contemplated dividing the field into two separate fields, but run into a
problem extracting the hour digit since not every value has three digits
(not to mention the result would be a text field that would prevent
calculations). I am not familiar with VBA and how to create macros, so I'm
pretty much limited to functions. Any help would be greatly appreciated!