rounding

  • Thread starter Thread starter RobcPettit
  • Start date Start date
R

RobcPettit

Hi, Iv assigned a value in vba to MyValue, Can somebody advise how I
round this up if the decimal is 0.5 or above, or down if below 0.5.
Regards Robert
 
VBA's Round (added in xl2k) works differently from Excel's =Round().

You may want to stick with Excel's:

Option Explicit
Sub testme()

Dim myValue As Double
Dim iCtr As Long

For iCtr = 1 To 4
myValue = iCtr + 0.5
MsgBox "myValue=" & myValue & _
vbLf & "Round=" & Round(myValue, 0) & _
vbLf & "Application.Round=" & Application.Round(myValue, 0)
Next iCtr

End Sub
 
Back
Top