Custom Formatting
Hi,
The basic format is something like
General "g"
and in code, with a fancier format"
Selection.NumberFormat = "0.000 000 000 ""g"""
--
If this helps, please click the Yes button
Cheers,
Shane Devenshire
"Aaron" wrote:
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.
|