Solved

VBA Rounding Issue

Posted on 2011-03-09
13
747 Views
Last Modified: 2012-06-10
in VBA i used Round() function to round off a number to 2 decimal.

For 2.855 the 2 decimal rounding should be 2.86, however using Round(2.855,2) gives 2.85 !!!

How to get round half up working ?

Help appreciated, Thanks.
0
Comment
Question by:cynx
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 4
  • 3
  • 2
  • +1
13 Comments
 
LVL 85

Expert Comment

by:Rory Archibald
ID: 35083988
Use Application.Round to get the worksheet function version of Round rather than the VBA Round.
0
 
LVL 33

Accepted Solution

by:
jppinto earned 167 total points
ID: 35084001
Use the Application.Round function instead, like this:

Application.Round(2.855, 2)

jppinto
0
 
LVL 9

Expert Comment

by:felixdsouza
ID: 35090671
I just checked and found that VBA rounding as mentioned in the question works just fine.

I am attaching a sample XL file with the code here.  Please check it out and let me know.

 VBA-Rounding.xls
0
Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
LVL 85

Assisted Solution

by:Rory Archibald
Rory Archibald earned 167 total points
ID: 35093241
VBA's Round function uses banker's rounding, the worksheet function ROUND uses arithmetic rounding. (the example given by the asker I suspect was a typo)
In a worksheet =ROUND(2.865,2) will give 2.87
In VBA Round(2.865,2) will give 2.86

If you want arithmetic rounding (consistent with the worksheet functions) you need either Application.Round or Application.WorksheetFunction.Round

Regards,
Rory
0
 
LVL 9

Assisted Solution

by:felixdsouza
felixdsouza earned 166 total points
ID: 35093342
Ok, rorya,

I agree with you on the point that Application.Round or Application.Worksheetfunction.Round needs to be used.

However, please look at the attached file:
VBA round correctly computes Round(2.855,2) as 2.86 and Round(2.875,2) as 2.88.

I suspect VBA alternates between rounding up and rounding down... where the last significant digit to be rounded off (in this case the second decimal digit) is odd, it rounds up (arithmetic rounding, which is want we want and expect), and where that particular digit is even, VBA round down.

I have attached sample file.
 VBA-Rounding-2.xls
0
 
LVL 85

Expert Comment

by:Rory Archibald
ID: 35093366
That's what I said - it's called Banker's Rounding. :)
0
 
LVL 1

Author Comment

by:cynx
ID: 35344130
sorry was away for a while, missed out on assigning points.
rorya's first post solved my issue, hence all 500 for him :), thanks all for help.
0
 
LVL 1

Author Comment

by:cynx
ID: 35344160
I am not able to allocate points as this was abandoned.
i get following error
This question already has an auto close request. You must cancel the previous request before creating another.

all 500 points should rightly be assigned to rorya. mods plz help sorting this out.
0
 
LVL 1

Author Comment

by:cynx
ID: 35344170
I am not able to allocate points as this was abandoned.
i get following error
This question already has an auto close request. You must cancel the previous request before creating another.

all 500 points should rightly be assigned to rorya. mods plz help sorting this out.
0
 
LVL 85

Expert Comment

by:Rory Archibald
ID: 35359557
Somebody care to explain this allocation which goes directly against what the asked wanted?
0

Featured Post

Online Training Solution

Drastically shorten your training time with WalkMe's advanced online training solution that Guides your trainees to action. Forget about retraining and skyrocket knowledge retention rates.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

When you see single cell contains number and text, and you have to get any date out of it seems like cracking our heads.
Access developers frequently have requirements to interact with Excel (import from or output to) in their applications.  You might be able to accomplish this with the TransferSpreadsheet and OutputTo methods, but in this series of articles I will di…
This Micro Tutorial demonstrates in Microsoft Excel how to consolidate your marketing data by creating an interactive charts using form controls. This creates cool drop-downs for viewers of your chart to choose from.
Polish reports in Access so they look terrific. Take yourself to another level. Equations, Back Color, Alternate Back Color. Write easy VBA Code. Tighten space to use less pages. Launch report from a menu, considering criteria only when it is filled…

628 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question