Question

我需要将range（“ M2：M13”）值四舍五入到两位小数点。我使用“ NumberFormat”选项编写了以下代码，但是当我将该值复制粘贴到另一个工作簿时，它向我显示公式栏中的整数和所选单元格中的四舍五入数字。

如何将数字完全四舍五入到小数点后两位？

    Sub RoundOff()

    Worksheets("Sheets2").Activate
    Range("M2").Select
    Selection.NumberFormat="0.00"   
    ActiveCell.FormulaR1C1="RC[-3]/RC[-4]*100"
    Range("M2:M13").Select
    Selection.FillDown
    End Sub

Answer 1

@NilushaM。您的公式中的“ RC [-3] /”前缺少一个“ =”。

您可以尝试：

Sub Test()

    With ThisWorkbook.Worksheets("Sheet2")

            .Range("M2").FormulaR1C1 = "=RC[-3]/RC[-4]*100"

        With .Range("M2:M13")
            .FillDown
            .NumberFormat = "0.00"
        End With

    End With

End Sub

如何通过excel宏四舍五入特定范围值

1 个答案: