You can try something like:
[vba]

Do

'Code

a = some number
b = some number
c = Round(a,2)
d = Round(b,2)

'More Code

Loop While c > d
[/vba]