监理检测网论坛

首页 » 试验检测论坛 » 试验检测管理综合交流 » 求Excec表格四舍六入五奇偶方法
zqfkchen - 2016/11/11 15:36:02
求Excec表格四舍六入五奇偶方法êL“iڏÌr<bbs.3c3t.com+ùÙL!ÛRُ
liuguiyuan140 - 2016/11/14 8:48:00
:default4:êL“iڏÌr<bbs.3c3t.com+ùÙL!ÛRُ
123983869 - 2016/11/14 8:58:20
BUG,没有êL“iڏÌr<bbs.3c3t.com+ùÙL!ÛRُ
xiashuang007 - 2016/11/16 15:13:15
=ROUND(ROUND(((A1+A2)/2/8),3)*8,1)êL“iڏÌr<bbs.3c3t.com+ùÙL!ÛRُ
这个是两个单元格 平均后修约精确至0.1。êL“iڏÌr<bbs.3c3t.com+ùÙL!ÛRُ
zqfkchen - 2017/1/13 17:03:00
回复 4楼xiashuang007的帖子êL“iڏÌr<bbs.3c3t.com+ùÙL!ÛRُ
êL“iڏÌr<bbs.3c3t.com+ùÙL!ÛRُ
谢谢êL“iڏÌr<bbs.3c3t.com+ùÙL!ÛRُ
smuiteeq - 2017/1/19 16:25:22
特别简单,复制下面的,建一个模块,然后用bround函数就行了,和round用法一样。可以推出末尾数为任何数的修约。êL“iڏÌr<bbs.3c3t.com+ùÙL!ÛRُ
'终极完美的四舍六入五留双的自定义函数代码,其实很简单êL“iڏÌr<bbs.3c3t.com+ùÙL!ÛRُ
Function bround(c#, d%)êL“iڏÌr<bbs.3c3t.com+ùÙL!ÛRُ
    bround = VBA.Round(CDec(c), d)êL“iڏÌr<bbs.3c3t.com+ùÙL!ÛRُ
End FunctionêL“iڏÌr<bbs.3c3t.com+ùÙL!ÛRُ
1
查看完整版本: 求Excec表格四舍六入五奇偶方法