实现数据修约-excel四舍五入

实现数据修约-excel四舍五入

具体规则如下：

 

1、被修约的数字小于5时，该数字舍去；

2、被修约的数字大于5时，则进位；

3、被修约的数字等于5时，要看5前面的数字，若是奇数则进位，若是偶数则将5舍掉，即修约后末尾数字都成为偶数；

若5的后面还有不为“0”的任何数，则此时无论5的前面是奇数还是偶数，均应进位。

简单口诀记忆

逢4舍去6必进，遇5按照5后情；

5后有数进上去，5后是零要看清：

5前是奇进上去，5前是偶不要进；

计算当中不修约，修约要在计算尽。

 

1）逢4舍去6必进

如：8.4444（修约保留3位小数）=8.444；

8.4446（修约保留3位小数）=8.445

2）5后有数进上去

如：8.44451（修约保留3位小数）=8.445

3）5前是奇进上去

如：8.44350（修约保留3位小数）=8.444

4）5前是偶不要进

如：8.44450（修约保留3位小数）=8.444

5）计算当中不修约，修约要在计算尽。

如：修约保留3位小数计算：0.4444 0.4446 0.44451 0.44350 0.44450 的平均值

（0.4444+0.4446+0.44451+0.44350+0.44450）/5=2.22151/5=0.44302=0.443 正确修约

（0.444+0.445+0.445+0.444+0.444）/5=2.222/5=0.4444=0.444 错误修约

（0.4444+0.4446+0.44451+0.44350+0.44450）/5=2.22151/5=2.222/5=0.4444=0.444 错误修约

 

02：用EXCEL表实现数据修约

 

EXCEL表格实现如下规则：

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位。

下面是这一公式的测试：

首先考虑以下几点，设置相应的原始数值测试修约功能：

≤4 时舍去

≥6时进上

当5后有数时进上；

当5后无数，且5前为奇数时，舍5入1(化双)；

当5后无数，且5前为偶数时，舍5不进（化双）