I tested your function, using both a numeric value  and a cell  reference, in a
worksheet and by calling the function  from another sub and it worked fine
(assuming you're looking for a result of 657.00).



How are you using the function?



One code question: If the decimal is greater than .87 don't you want to round
up?