将小数舍入为整数

Question

我只是想知道如何将小数四舍五入到最接近的整数。所以问题是，我使用的是Round(Total / i, 0)代码，但当值类似于.5小数时，它不会四舍五入

示例：该值为92.5，但结果仅显示92，而不是93。

Answer 1

您可以使用Roundup()函数。对于VBA，尝试类似-

Sub rUP()
Dim x As Double
x = 92.5
MsgBox Application.WorksheetFunction.RoundUp(x, 0)

End Sub