VBA .value to 1 decimal place

[c.davidson]

I have some code to assign the value of a cell to a variable in VBA.

For example:

Value1 = Sheets("Sheet 1").cells(3,1).value

And I'd like put this value in another cell, but just to 1 decimal place even if there is a 0. I don't want to format the cell to 1 decimal place, I want the actual value to be 1 decimal place.

Any ideas?

[Olly]

Try:

Please Login or Register  to view this content.

[cytop]

Use the Round() function to round the value to a specified number of decimal places but don't forget that cell formatting will also be a factor. If the result of the rounding is, for example, exactly 3.0 then default cell formatting will not show the decimal...