PRB: Round Function different in VBA 6 and Excel Spreadsheet (194983)

Microsoft Visual Basic Learning Edition for Windows 6.0

Microsoft Visual Basic Professional Edition for Windows 6.0

Microsoft Visual Basic Enterprise Edition for Windows 6.0

Microsoft Excel 97 for Windows

This article was previously published under Q194983

SYMPTOMS

When using the Round() function in Visual Basic 6.0, a different result may be returned than when using it in a cell formula of an Excel spreadsheet.

CAUSE

The VBA Round() function uses Banker's rounding while the spreadsheet cell function uses arithmetic rounding.

RESOLUTION

Write a custom function to get the desired results.

STATUS

This behavior is by design.

MORE INFORMATION

The Round() function in an Excel spreadsheet uses Arithmetic rounding, which always rounds .5 up (away from 0). The Round() function in Visual Basic for Applications 6, uses Banker's rounding, which rounds .5 either up or down, whichever will result in an even number.

Steps to Reproduce Behavior

In Excel, open a new spreadsheet and type the following formula into one of the cells:
```
       =Round(2.5, 0)
						
```
The result is 3.
In Visual Basic 6.0 or other applications using VBA 6, open a new project and type the following expression into the Debug or Immediate window:
```
      ? Round(2.5, 0)
						
```
The result is 2.

REFERENCES

For additional information on rounding, click the article number below to view the article in the Microsoft Knowledge Base:

196652 HOWTO: Implement Custom Rounding Procedures

Modification Type:

Minor

Last Reviewed:

3/7/2005

Keywords:

kbprb KB194983