Calculation in vba not rounding up.

[TOMMY.MYERS668]

Ok I'm wearing this forum out.. That's what i get for trying to reteach myself vba and access 11 years since the last time i used it.

I have a calculation in access that very seldom returns a whole number but I need it to round up to the next whole number if it does not. I have searched for other posts on here and come up with some of it I think but It doesnt seem to be working. It must allways round up tho rounding down will hose what im trying to accomplish.

So far I have this jewel:
Private Sub QUOTAS_AfterUpdate()
Dim instructorsreq As Long
instructorsreq = Me![QUOTAS] \ Me![ISR]


If instructorsreq = Int(instructorsreq) Then
Me![INSTRUCTORS REQUIRED] = instructorsreq
Else
Me![INSTRUCTORS REQUIRED] = Int(instructorsreq) + 1
End If

End Sub

Ive seen some post about negative intigers but im not quite understanding what there doing - Its been along week. any ideas?

[alcapps]

there is a
Math.Round(instructorsreq,2)

function round()

are you trying to get the next integer value up from the value you return form you calculation?
or a true rounding to a decimal place.

[TOMMY.MYERS668]

basically i need to know how many instructors are required to be scheduled for a clas- so if my instructor to student ration ins 1 instructor : 12 students and my quota for the class is 23 Is should say instructors required are 2 - it would only say 1 if my quota was 12 or less. so basically yes to the next highest integer.

[pbaldy]

Conceptually what you're doing is fine. It breaks down because of:

Dim instructorsreq As Long

Long will only hold the integer portion, no decimal. I'd probably use Currency to avoid floating point issues.

[TOMMY.MYERS668]

I'll give it a shot and let you know real quick thanks.

[TOMMY.MYERS668]

ok dim'd as currency still is not giving me the next integer up.... now current code is :
Private Sub QUOTAS_AfterUpdate()
Dim instructorsreq As Currency
instructorsreq = Me![QUOTAS] \ Me![ISR]
If instructorsreq = Int(instructorsreq) Then
Me![INSTRUCTORS REQUIRED] = instructorsreq
Else
Me![INSTRUCTORS REQUIRED] = Int(instructorsreq) + 1
End If

End Sub

is it maybe something in the way I have the actual instructors required box in access formatted?

[pbaldy]

Try

instructorsreq = Me![QUOTAS] / Me![ISR]

[TOMMY.MYERS668]

Ok changing the from backslash to forward slash worked!. Is there any particular reason why it worked?? does access perform a diffent function for different slashes? but at anyrate your awesome!

[pbaldy]

Yes, the back slash is different. From an MS site, it will:

Round both numbers to integers, divide the first number by the second number, and then truncate the result to an integer.