Macro using "ROUND" function.

[sivaduraikumar]

Hi All,

I have the problem in using the function "ROUND" in macro.

Example:
In excel
1.5-----> ROUND(1.5,0)====> 2

But while using macro,

1.5-----> ROUND(1.5,0)====> 1

For other values, macro works fine.

My VBA code:

For j = 3 To (a + 3)
C = Range("B" & j).Value
ActiveCell.Value = Round(C, 0)
ActiveCell.Offset(1, 0).Select
Next j

Could anyone help me plz???

[oeldere]

Untested, but you could try this.

ActiveCell.Formula = Round(C, 0)

[sivaduraikumar]

Untested, but you could try this.

ActiveCell.Formula = Round(C, 0)

Thank you for your idea.
But this also remians the same problem which i posted earlier.

[oeldere]

another guess

Please Login or Register  to view this content.

[sivaduraikumar]

another guess

Please Login or Register  to view this content.

This also not working!!!

[sivaduraikumar]

Atlast I found the solution!!!!
ActiveCell.Value = Round(C, 0) is changed as ActiveCell.Value = Application.Round(C, 0)
Now its working fine.
I think that we can use this as "ActiveCell.Value = WorksheetFunction.Round(C, 0)"

Thank you all!!!