Update:

Using:

Function MyMod(n, m)
MyMod = (CDec(n) - m * Int(CDec(n) / m))
End Function

I was able to go as far as mod(10e28;97), anything higher and it returns
#VALUE!

I need to go as far as 10e32, almost there :)

Any thoughts?