Sub test()
MsgBox Round(50.599, 1)
MsgBox CLng(50.599 * 10) / 10
End Sub

HTH. Best wishes Harald

"animal1881 " skrev i melding
...
Hello all!

I have a rounding issue. I have numbers that are stored in an array as
singles. I want to round them to 1 decimal place "00.0". The way I
usually round is like this:

Sub test()
MsgBox (Int(50.599 * 10) * 0.1 & " " & 50.6)
End Sub

But try this yourselves and you will see that the message box says 50.5
50.6.

Does anyone know a better method of accuratly rounding?


---
Message posted from http://www.ExcelForum.com/