Round Down to one decimal

[mbentley]

Can anyone tell me how to round down (in this case to 1 decimal place). I need something like the rounddown function in excel.

 

[Alexandre]

Try:

Function RoundN(x, N As Integer)
'
' Rounds a number to N decimal places
' Uses arithmatic rounding
' N should be in the range 0-10 for proper results
'
Dim Factor As Long
Factor = 10 ^ N
RoundN = Int(x * Factor) / Factor
End Function