Round up decimal value to one in VBA code

i want some change in that VBA code which is in attached file i want that where is decimal value is
equal or greater than 0.50 then round up that value to one.for example in the attached file you can see in cell A18 value is 48184.50 so display the
expected result "Forty Eight Thousand One Hundred Eighty Five". if decimal value is less than 0.50 for example 48184.33
then show result "Forty Eight Thousand One Hundred Eighty Four"
so please tell me the solution

Does this work?

in A18
=CEILING(A14+A16,1)

Insert this line before your "String representation of amount" line

Please Login or Register  to view this content.