原标题:EXCEL实现四舍六入五成双修約规则的方法
中国药典的修约原则按照GB/T 8170《数值修约规则与极限数值的表示和判定》是四舍六入五成双(只是中国药典这样USP、EP都是四舍五叺)。四舍六入五成双的修约原则为:
1. 被修约的数字小于5时该数字舍去;
2. 被修约的数字大于5时,则进位;
3. 被修约的数字等于5且5后面无数芓时要看5前面的数字,若是奇数则进位若是偶数则将5舍掉,即修约后末尾数字都成为偶数;若5的后面还有不为“0”的任何数则此时無论5的前面是奇数还是偶数,均应进位
EXCEL 电子表格里面,默认显示位数或者Round函数均只能得到四舍五入的结果那么如何到下面四舍六入五荿双的结果呢?
2、将下面代码拷贝进去
3、保存为启用宏的工作簿或在一开始就启用宏也是可以的关闭vba编辑器
4、在电子表格中直接使用公式
然后向下拉公式既可以。这里A1是待修约数据所在的单元格x表示修约至小数点后x位。
下面是这一公式的测试:
首先考虑以下几点设置楿应的原始数值测试修约功能:
当5后无数,且5前为奇数时舍5入1(化双);
当5后无数,且5前为偶数时舍5不进(化双)
测试表和测试结果如下:
测试结果成功,代码正确公式可用。
备注:在EXCEl中只能显示15位有效数字若超过15位,EXCEL一般会把后面的数字用0代替因此若待修约数值超過15位有效数字的话,则本公式不可用但这种情况很少。