试验检测的数值修约原则是四舍六入五成双(并非四舍五入)。四舍六入五成双的修约原则为: 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位有效数字的话,则本公式不可用。但这种情况很少。 神器: |
|
来自: 昵称62862138 > 《待分类》