请教各位大神，round为什么不是四舍五入？

kinsun

C1的值是行号+B1/A1，C2、C3以此类推，然后保留1位小数，应该分别是3.3、4.3、5.3才对，为什么是3.2、4.2、5.2？，请各位大神赐教。

kinsun

请教各位大神，如何避免这种情况？

gwjkkkkk

WorksheetFunction.Round
用工作表函数

lbpp

几乎所有的编程语言中的四舍五入都采用一种叫“银行家舍入法”的方法来进行的，VBA也使用的也是这种传入法。可自行搜索“银行家舍入“
当截断位置后的值大于5，进1
当截断位置后的值小于5，舍去
当截断位置后的值等于5，作判断，截断位左侧为奇数，进1；截断位左侧为偶数，舍去。
简单来说就是四舍六入五留双。

这种传入法入传统的四舍五入的差别只会出现在截断位后正好是5，并且截断位前为偶数的情况。你遇到的正好是这种情况。

VBA中如要使用传统的四舍五入，可以使用excel的工作表round函数，application.worksheetfunction.round()。

很早之前我也遇到过这个情况，当时也有疑惑，后来找了一些资料后才知道是这么回事。附上当时的贴子链接，供参考。
https://club.excelhome.net/thread-264823-1-1.html

cidanji

直接用工作表函数round就不考虑那么多了
vba中round是按 四舍六入，五判断，五后非零则进一，五后皆零则成双，除了偶尔带来误差没啥大用处

gwjkkkkk

cidanji 发表于 2024-3-13 08:22
直接用工作表函数round就不考虑那么多了
vba中round是按 四舍六入，五判断，五后非零则进一，五后皆零则成 ...

涨见识了。。。

高个子

round前加WorksheetFunction就是四舍五入了。vba中round是按 四舍六入五成双规则，这个规则经常在工程里用到，所以微软特意在VBA里弄四舍六入五成双，工作表函数弄成四舍五入。