特别简单,复制下面的,建一个模块,然后用bround函数就行了,和round用法一样。可以推出末尾数为任何数的修约。æ¹ÜÑç̺äbbs.3c3t.comYªÜk_AÐ{
'终极完美的四舍六入五留双的自定义函数代码,其实很简单æ¹ÜÑç̺äbbs.3c3t.comYªÜk_AÐ{
Function bround(c#, d%)æ¹ÜÑç̺äbbs.3c3t.comYªÜk_AÐ{
bround = VBA.Round(CDec(c), d)æ¹ÜÑç̺äbbs.3c3t.comYªÜk_AÐ{
End Functionæ¹ÜÑç̺äbbs.3c3t.comYªÜk_AÐ{