Excel中的四舍六入五成双

    我们都知道四舍五入是一种精确的计数保留法，但是他就是最精确，最能得到我们想要的吗？反正我之前认为他是可以的，但是今天企业要求我们用了一种新得保留方法，四舍六入五成双，他是一种比较精确比较科学的计数保留法，是一种数字修约规则。

    对于位数很多的近似数，当有效位数确定后，其后面多余的数字应该舍去，只保留有效数字最末一位，这种修约（舍入）规则是“四舍六入五成双”，也即“4舍6入5凑偶”这里“四”是指≤4 时舍去，"六"是指≥6时进上，"五"指的是根据5后面的数字来定，当5后有数时，舍5入1；当5后无有效数字时，需要分两种情况来讲：①5前为奇数，舍5入1；②5前为偶数，舍5不进。

    今天我们就来共同探讨，如何在excel中来实现四舍六入五成双，总的来说分为两种：

    第一种：就是直接在单元格中计算

<span style="font-family:KaiTi_GB2312;font-size:18px;">   =IF(MOD(E2*10,1)=0.5,ROUND(E2/2,1)*2,ROUND(E2,1))
</span>

   第二种：在excel中编写自定义函数。

   1.首先，在Excel中按下Alt+F11，进入如下页面，然后右击插入--模块：

   

    将以下任何一个函数放入，然后再单元格内调用即可：

<span style="font-family:KaiTi_GB2312;font-size:18px;">    Function TranValue(rng As Double, number As Integer) As Double

      TranValue = Round(rng, number)

    End Function
</span>

<span style="font-family:KaiTi_GB2312;font-size:18px;">   Function bround(c#, d%)
     bround = VBA.Round(CDec(c), d)
   End Function
</span>

    这样我们就可以实现四舍六入五成双了，在我们不得不感慨excel强大的功能的同事，我们应该考虑是否可以在oracle数据库中直接实现呢，而不是在excel中。如果有想法可以交流一下。