ABS Function

It will return the absolute value or positive value of the number
Dim MyValue, MyReturn
MyValue = -34.2345325
MyReturn = Abs(MyValue)
MsgBox MyReturn