View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Tom Ogilvy Tom Ogilvy is offline
external usenet poster
 
Posts: 6,953
Default Formatting Numbers with Decimal Places

s = Format (value here, "0.##")
if right(s,1) = "." then
s = Replace(s,".","")
end if

--
Regards,
Tom Ogilvy



"James" wrote:

Is it possible to format numbers that are displayed in a text box in such a
way that fractional values are displayed to 2 decimal places and whole
numbers are not displayed with any decimal point?

I have tried using the code:
Format (value here, "0.##")

This works okay and works nicely for the fractional values, but when whole
numbers enter the text box the decimal point is displayed without any
trailing values. For example, "4880." Instead, I would like "4880" to be
displayed.

Thanks in advance for any suggestions,

James