[算表] VBA比对资料数值相同却不符

楼主: playbird (无止境的无聊)   2019-08-21 16:39:03
软件:Excel
版本:2010
附件 https://tinyurl.com/y4fgw4bj
档案如附件,
VBA code:
Sub 比对()
If Worksheets("耗用").Cells(29, 12) <> Worksheets("MB5Btemp").Cells(27,3) Then
MsgBox "不符"
End If
End Sub
其中 耗用!L29 = 21,394.308
MB5BTemp!C27 = 21394.308
如果在excel中使用=IF(耗用!L29<>MB5BTemp!C27,1,0)将显示0 显示数值相符,
但VBA总是跳不符
请各位帮忙看看,谢谢了
作者: soyoso (我是耀宗)   2019-08-21 16:51:00
有可能是浮点数的问题,可以函数round来排除如果要用round来排除的话,请用worksheetfunction的round而非用vba内的,因有四舍六入五成双的规则,特定条件下是不同于工作表函数的四舍五入测试,如 https://i.imgur.com/kRytmnh.jpg 则会判断为真假而不会执行msgbox
楼主: playbird (无止境的无聊)   2019-08-21 17:36:00
谢谢soyoso哥~

Links booklink

Contact Us: admin [ a t ] ucptt.com