Rounding to multiples of 2

[Stiemied]

Working on a Access query to pay multiples of 2 hours of time worked
by 75. My problem is I'm not sure how to exclude or remove time that
is not a multiple of 2 (round up or down any decimal to nearest whole
number). Any help would be greatly appreciated.

([minutes]/120)*75

[chris.nebinger]

You could use the following function:

Function Hours2(Minutes) As Integer
Dim temp As Integer
temp = Nz(Minutes, 0)
Dim i As Integer
Dim m As Integer
i = temp \ 120
m = temp Mod 120
If m >= 60 Then i = i + 1
Hours2 = i * 75
End Function
Paste that code into a module and save it. Then, in a query, you
could use:

Pay:Hours2([minutes])
Chris
On Jan 30, 9:21 am, "Stiemied" <[e-mail]:

Working on a Access query to pay multiples of 2 hours of time worked
by 75. My problem is I'm not sure how to exclude or remove time that
is not a multiple of 2 (round up or down any decimal to nearest whole
number). Any help would be greatly appreciated.

([minutes]/120)*75

[Marshall Barton]

Stiemied wrote:

>Working on a Access query to pay multiples of 2 hours of time worked
by 75. My problem is I'm not sure how to exclude or remove time that
is not a multiple of 2 (round up or down any decimal to nearest whole
number). Any help would be greatly appreciated.

([minutes]/120)*75

If time worked is a datetime value:

(Int(timevalue*12) /12) * 75

If time worked is the number of minutes:

(minutes \ 120) * 75

--
Marsh

[Stiemied]

Thank you for the quick answer! It works perfectly

Matt
On Jan 30, 1:00 pm, "[e-mail]"
<[e-mail]:

You could use the following function:

Function Hours2(Minutes) As Integer
Dim temp As Integer
temp = Nz(Minutes, 0)
Dim i As Integer
Dim m As Integer
i = temp \ 120
m = temp Mod 120
If m >= 60 Then i = i + 1
Hours2 = i * 75
End Function

Paste that code into a module and save it. Then, in a query, you
could use:

Pay:Hours2([minutes])

Chris

On Jan 30, 9:21 am, "Stiemied" <[e-mail]:

Working on a Access query to pay multiples of 2 hours of time worked
by 75. My problem is I'm not sure how to exclude or remove time that
is not amultipleof 2 (roundup or down any decimal to nearest whole
number). Any help would be greatly appreciated.

([minutes]/120)*75- Hide quoted text -- Show quoted text -