round up to nearest

i am dealing with currency variables and what i want to do is always round up to the nearest 10p.

if it was 33.42 then i want it to return 33.50 but if its already on a full 10p like 33.40 then do nothing.

thanks.

Check out the Round function

i have but it rounds up and down depending on the number.

thanks

Well, you can roll your own Round function, then, or do a simple hack like this:


If nNumber - int(nNumber) < .05 Then
nNumber = nNumber + .05
End If
nNumber = Round(nNumber, 2)

this is a neat little trick to always round up

yournumber = -Int(-yournumber)

so, because you are rounding up the decimal part, try this.

yournumber = -Int(-yournumber * 10) / 10


thingimijig.

thats it !!, thank you.

i am dealing with currency variables and what i want to do is always round up to the nearest 10p.

if it was 33.42 then i want it to return 33.50 but if its already on a full 10p like 33.40 then do nothing.

thanks.
just another method....


If (CDbl(yourNumber) - CInt(yourNumber)) <> 0 Then
If ((CDbl(yourNumber) - CInt(yourNumber)) * 100 Mod 10) > 0 Then
yourNumber = CInt(yourNumber) + 1
End If
End If


all the best....
:)

Why not just

number = Int(10*(number + 0.5)) / 10

darkforcesjedi, even though i am happy with what i have, i tried yours and

33.42 returns 33.9

thanks anyway.

Oops, thats because I put a parenthesis in the wrong place

number = Int(10*(number) + 0.5) / 10

but then again you wanted to round UP and not just round the number so nevermind anyway.

just another method....


If (CDbl(yourNumber) - CInt(yourNumber)) <> 0 Then
If ((CDbl(yourNumber) - CInt(yourNumber)) * 100 Mod 10) > 0 Then
yourNumber = CInt(yourNumber) + 1
End If
End If


all the best....
:)
oops... there was a small mistake in my previous code... it wont satisfy the purpose..
below given is the updated code... i know that u have got better solution... just correcting my mistake...


If (CDbl(yourNumber) - CInt(yourNumber)) <> 0 Then
If ((CDbl(yourNumber) - CInt(yourNumber)) * 100 Mod 10) > 0 Then
yourNumber = CDbl(yourNumber) - ((((CDbl(yourNumber) - CInt(yourNumber)) * 100) Mod 10) / 100) + 0.1
End If
End If


thanx..
:)