Rounding 1

[Pitchfork]

Hi<br>
How can I round a number up to the next whole number?<br>

 

[Hallsys]

Look at Access, Office VB issue 9902. Editor Ken Getz (co-author of The Access XX Handboook series) gives a great rounding routine. This mag is a great reference for dev tips and is well worth the $$.

 

[Pitchfork]

Where can I find Office VB issue 9902

 

[Calimero]

SUB UpTrunc(x As double)<br>
Dim result As long<br>
result = Int(x) 'I believe it's Int, otherwise try Trunc<br>
If result&lt;&gt;x Then result = result + 1<br>
UpTrunc = result<br>
END SUB

 

[mixc]

how about adding .5 and then assigning to an INT or using INT function