Round Function Error

I think Gary''s Student have not understood my question. I know that 1.85 is
correct but if you run the macro then you can understand my question. The
Value of "a" is comming 1.84. This is an Error of Round Function. Can anyone
Help me to solve this Problem?




You don't need to do anything.

The value of 1.85 is correct (at least consistent with the worksheet function)
--
Gary''s Student - gsnu200805


"Arvind Mane" wrote:

> Please see the following Macro
>
> Sub Data1()
>
> a = 1.845
> a = Round(a, 2)
>
> End Sub
>
> i am getting "a" value as 1.84 instead of 1.85.
> What should i do?

Hi Arvind,

If you truly want it to RoundUp, then change your procedure to:

Sub Data1()
Dim a As Double
a = 1.845
a = Application.WorksheetFunction.RoundUp(a, 2)
Debug.Print a
End Sub

Good Luck.

"Arvind Mane" wrote:

> I think Gary''s Student have not understood my question. I know that 1.85 is
> correct but if you run the macro then you can understand my question. The
> Value of "a" is comming 1.84. This is an Error of Round Function. Can anyone
> Help me to solve this Problem?
>
>
>
>
> You don't need to do anything.
>
> The value of 1.85 is correct (at least consistent with the worksheet function)
> --
> Gary''s Student - gsnu200805
>
>
> "Arvind Mane" wrote:
>
> > Please see the following Macro
> >
> > Sub Data1()
> >
> > a = 1.845
> > a = Round(a, 2)
> >
> > End Sub
> >
> > i am getting "a" value as 1.84 instead of 1.85.
> > What should i do?
>