可以在excel中建立宏,然后输入以下程序:
Function Roundx(x, n)
y = x * 10 ^ n - Int(x * 10 ^ n)
z = Int(x * 10 ^ n)
If y >= 0.6 Then
p = (Int(x * 10 ^ n) + 1) / 10 ^ n
ElseIf y < 0.5 Then
p = Int(x * 10 ^ n) / 10 ^ n
ElseIf z / 2 = z \ 2 Then
p = Int(x * 10 ^ n) / 10 ^ n
ElseIf z / 2 <> z \ 2 Then
p = (Int(x * 10 ^ n) + 1) / 10 ^ n
End If
Roundx = p
End Function
当n为正,则为小数点之后,n为负,则小数点之前。