粘贴在单元格中时，VBA Excel值会舍入

Question

我是vba的新手。我需要使用宏将值粘贴到单元格。当我将值粘贴到单元格时它是圆形的。例如，我有值5.048，当我将它粘贴到单元格值轮到5.05但我需要5.048。我使用这段代码：

Range(Cell1, Cell1).Value = Replace(CStr(sum), ",", ".")

如果我这样做：

Range(Cell1, Cell1).Value =Replace(CStr(Round(sum, 3)), ",", ".")

结果是一样的。如何格式化单元格以在小数点后显示3位数？

Answer 1

Range(Cell1, Cell1).Value = Replace(CStr(Sum), ",", ".")
Range(Cell1, Cell1).NumberFormat = "0.000"

＆＃34; 0.000＆＃34; =三位小数。如果你想要更多的小数，请增加零的数量。