试验检测的数值修约原则是四舍六入五成双(并非四舍五入)。四舍六入五成双的修约原则为:
1. 被修约的数字小于5时,该数字舍去;
2. 被修约的数字大于5时,则进位;
3. 被修约的数字等于5时,要看5前面的数字,若是奇数则进位,若是偶数则将5舍掉,即修约后末尾数字都成为偶数;若5的后面还有不为“0”的任何数,则此时无论5的前面是奇数还是偶数,均应进位。
EXCEL2003/2007/2010/2013电子表格里面,如果使用Round函数只能得到四舍五入的结果,那么如何到下面四舍六入五成双的结果呢?
1、按ALT+F11,打开vba编辑器
右键点击Thisworkbook-插入-模块
2、将下面代码拷贝进去
Function TranValue(rng As Double, number As Integer) As Double
TranValue = Round(rng, number)
End Function
3、保存为启用宏的工作簿或在一开始就启用宏也是可以的,关闭vba编辑器
4、在电子表格中直接使用公式
= tranvalue(A1,x)
然后向下拉公式既可以。这里A1是待修约数据所在的单元格,x表示修约至小数点后x位。参加试验检测考试加微信:13527870418购买开通微试验题库
下面是这一公式的测试:
首先考虑以下几点,设置相应的原始数值测试修约功能:
≤4 时舍去
≥6时进上
当5后有数时进上;
当5后无数,且5前为奇数时,舍5入1(化双);
当5后无数,且5前为偶数时,舍5不进(化双)
测试表和测试结果如下:
测试结果成功,代码正确,公式可用。
备注:在EXCEl中只能显示15位有效数字,若超过15位,EXCEL一般会把后面的数字用0代替,因此若待修约数值超过15位有效数字的话,则本公式不可用。但这种情况很少。