View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Aaron Aaron is offline
external usenet poster
 
Posts: 59
Default Custom Formatting

Hi,

I have a cell that I want to have a number and a letter in, ie 0.02 g.
I need to be able to set this format based on another cells current
formatting which might be 0.000 or 0.000 0 or 0.000 00 etc. (Every 3
decimal places there goes a space before more decimal place holders
are listed.)

I currently use a macro tied to a button called Decimal Place to
change the rest of the sheet based on a keycell's decimal placing, but
I dont know how to have it do it to a cell and then add a "g" after
it.

Sub DP()

Application.ScreenUpdating = False
Range
("f18,i21:i31,q15,g18,e34,c20:c30,k21:k31,m21:m31, o21:o31,q21:q31,s21").NumberFormat
= _
Range("q16").NumberFormat

End Sub

TIA

Aaron.