Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 6
Default How to programmatically add a non standard custom cell format

Hi,

I have a value in a cell I.e. 123456 that I wish to display to 3 significant
figures I.e. 123000.

My question is this : I wish to present the significant value as a display
format and not change the underlying value.

So far as I am aware the custom cell format codes do not include a
significant figure code. I.e. #, etc..

I can use either a UDF or macro that can return the value to the required
significant figures.

So any ideas? Is there a way I can do this I.e. have 123456 in the cell but
display 123000. Note the cell value is not a fixed width I.e. it could take
values such as 0.0001234, 1234, 1234.123, etc. and be displayed as 0.000123,
123, 1230.
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1
Default How to programmatically add a non standard custom cell format

Does this...

#,"000"

or perhaps this (if you want to retain the "leading" zero for values less
than 1000)...

0,"000"

custom format do what you want (use them exactly as shown... with the quote
marks)?

Rick


"tiamat" wrote in message
...
Hi,

I have a value in a cell I.e. 123456 that I wish to display to 3
significant
figures I.e. 123000.

My question is this : I wish to present the significant value as a display
format and not change the underlying value.

So far as I am aware the custom cell format codes do not include a
significant figure code. I.e. #, etc..

I can use either a UDF or macro that can return the value to the required
significant figures.

So any ideas? Is there a way I can do this I.e. have 123456 in the cell
but
display 123000. Note the cell value is not a fixed width I.e. it could
take
values such as 0.0001234, 1234, 1234.123, etc. and be displayed as
0.000123,
123, 1230.


  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 6
Default How to programmatically add a non standard custom cell format

Hi Rick,

Unfortunately not, as that takes the thousands part and then appends the
text. The cell value can take any value, so the above would work only if the
scale was set.

However, that does lead me to thinking about using a multi conditional
format which uses scale i.e. 0-9, 10-99, 100-999, but that would be a bit
ghastly.

Ideally, I would like to call out to my own UDF function/Macro that returned
back a string for the value. If this is possible?


"Rick Rothstein (MVP - VB)" wrote:

Does this...

#,"000"

or perhaps this (if you want to retain the "leading" zero for values less
than 1000)...

0,"000"

custom format do what you want (use them exactly as shown... with the quote
marks)?

Rick


"tiamat" wrote in message
...
Hi,

I have a value in a cell I.e. 123456 that I wish to display to 3
significant
figures I.e. 123000.

My question is this : I wish to present the significant value as a display
format and not change the underlying value.

So far as I am aware the custom cell format codes do not include a
significant figure code. I.e. #, etc..

I can use either a UDF or macro that can return the value to the required
significant figures.

So any ideas? Is there a way I can do this I.e. have 123456 in the cell
but
display 123000. Note the cell value is not a fixed width I.e. it could
take
values such as 0.0001234, 1234, 1234.123, etc. and be displayed as
0.000123,
123, 1230.



  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1
Default How to programmatically add a non standard custom cell format

Can you give us examples of the various type of values (0-9, 10-99, 100-999,
etc.) and show us how want them all to look? Also, can there be negative
values?

Rick


"tiamat" wrote in message
...
Hi Rick,

Unfortunately not, as that takes the thousands part and then appends the
text. The cell value can take any value, so the above would work only if
the
scale was set.

However, that does lead me to thinking about using a multi conditional
format which uses scale i.e. 0-9, 10-99, 100-999, but that would be a bit
ghastly.

Ideally, I would like to call out to my own UDF function/Macro that
returned
back a string for the value. If this is possible?


"Rick Rothstein (MVP - VB)" wrote:

Does this...

#,"000"

or perhaps this (if you want to retain the "leading" zero for values less
than 1000)...

0,"000"

custom format do what you want (use them exactly as shown... with the
quote
marks)?

Rick


"tiamat" wrote in message
...
Hi,

I have a value in a cell I.e. 123456 that I wish to display to 3
significant
figures I.e. 123000.

My question is this : I wish to present the significant value as a
display
format and not change the underlying value.

So far as I am aware the custom cell format codes do not include a
significant figure code. I.e. #, etc..

I can use either a UDF or macro that can return the value to the
required
significant figures.

So any ideas? Is there a way I can do this I.e. have 123456 in the cell
but
display 123000. Note the cell value is not a fixed width I.e. it could
take
values such as 0.0001234, 1234, 1234.123, etc. and be displayed as
0.000123,
123, 1230.




  #5   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 342
Default How to programmatically add a non standard custom cell format

Try This

Sub try()

ActiveCell = WorksheetFunction.Round(ActiveCell, -3)

End Sub

"tiamat" wrote:

Hi,

I have a value in a cell I.e. 123456 that I wish to display to 3 significant
figures I.e. 123000.

My question is this : I wish to present the significant value as a display
format and not change the underlying value.

So far as I am aware the custom cell format codes do not include a
significant figure code. I.e. #, etc..

I can use either a UDF or macro that can return the value to the required
significant figures.

So any ideas? Is there a way I can do this I.e. have 123456 in the cell but
display 123000. Note the cell value is not a fixed width I.e. it could take
values such as 0.0001234, 1234, 1234.123, etc. and be displayed as 0.000123,
123, 1230.



  #6   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 342
Default How to programmatically add a non standard custom cell format

Sorry, that changes the value. But if you could just reference the value
from another location, the formula would work fine in a spreadsheet.

Tom

"TomPl" wrote:

Try This

Sub try()

ActiveCell = WorksheetFunction.Round(ActiveCell, -3)

End Sub

"tiamat" wrote:

Hi,

I have a value in a cell I.e. 123456 that I wish to display to 3 significant
figures I.e. 123000.

My question is this : I wish to present the significant value as a display
format and not change the underlying value.

So far as I am aware the custom cell format codes do not include a
significant figure code. I.e. #, etc..

I can use either a UDF or macro that can return the value to the required
significant figures.

So any ideas? Is there a way I can do this I.e. have 123456 in the cell but
display 123000. Note the cell value is not a fixed width I.e. it could take
values such as 0.0001234, 1234, 1234.123, etc. and be displayed as 0.000123,
123, 1230.

  #7   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 5,600
Default How to programmatically add a non standard custom cell format

That wouldn't be necessary. In a change event could apply the cell's number
format to display as required leaving the underlying value unchanged, eg

d = theCell.Value ' d = 123456

' bunch of code to get the right format

s = """123000"""

theCell.NumberFormat < s then theCell.NumberFormat = s

At the moment I think Rick is waiting for the OP to come back with further
details

Regards,
Peter T

"TomPl" wrote in message
...
Sorry, that changes the value. But if you could just reference the value
from another location, the formula would work fine in a spreadsheet.

Tom

"TomPl" wrote:

Try This

Sub try()

ActiveCell = WorksheetFunction.Round(ActiveCell, -3)

End Sub

"tiamat" wrote:

Hi,

I have a value in a cell I.e. 123456 that I wish to display to 3

significant
figures I.e. 123000.

My question is this : I wish to present the significant value as a

display
format and not change the underlying value.

So far as I am aware the custom cell format codes do not include a
significant figure code. I.e. #, etc..

I can use either a UDF or macro that can return the value to the

required
significant figures.

So any ideas? Is there a way I can do this I.e. have 123456 in the

cell but
display 123000. Note the cell value is not a fixed width I.e. it could

take
values such as 0.0001234, 1234, 1234.123, etc. and be displayed as

0.000123,
123, 1230.



  #8   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 6
Default How to programmatically add a non standard custom cell format

Thanks for the responses guys.

Firstly, to Rick
"Can you give us examples of the various type of values (0-9, 10-99, 100-999,
etc.) and show us how want them all to look? Also, can there be negative
values?"

Thanks for the interest but as you probably figured if one includes negative
values and taking Excel's precision of 15. Then that would mean 15 * 2 = 30
conditional format combinations and 14 more I believe if precision is for
example 0.00000000000000123456789112345. I have probably got the numbers
wrong but throw in negative numbers and worse case scenario that is 88
conditional formats. Thats why I thought it was a bit ghastly and discounted
it. I probably got the value extent wrong but you get my drift.

This one is at Peter :
This is actually a very interesting idea. Depending on where you capture
it. It would be possible after I have written the values to the grid to then
explicitly overwrite the number format as a second stage. I will give that a
go.


  #9   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 6
Default How to programmatically add a non standard custom cell format

At : Peter

That did the trick :) works like a charm, thank you very much
  #10   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1
Default How to programmatically add a non standard custom cell format

Firstly, to Rick
"Can you give us examples of the various type of values (0-9, 10-99,
100-999,
etc.) and show us how want them all to look? Also, can there be negative
values?"

Thanks for the interest but as you probably figured if one includes
negative
values and taking Excel's precision of 15. Then that would mean 15 * 2 =
30
conditional format combinations and 14 more I believe if precision is for
example 0.00000000000000123456789112345. I have probably got the numbers
wrong but throw in negative numbers and worse case scenario that is 88
conditional formats. Thats why I thought it was a bit ghastly and
discounted
it. I probably got the value extent wrong but you get my drift.


Why are you placing restrictions on what can and can't be done? In your
first post, you mentioned the possibility of using VBA code to accomplish
what you want... there are not very many restrictions on what you can and
cannot do with VBA code. I was not thinking of using conditional formats,
rather, I figured if the cell format I posted wouldn't work for you, then I
would attempt some event code to do what you want. The key for me (and the
other volunteers here I would guess) is to understand your question in full.
With that in mind, can you provide the example values and results you want
from them that I originally asked you for? And, if you would like to handle
negative values, indicate that and provide samples for them if the results
for negative values are not simply the same as for the positive ones except
for their minus signs.

Rick



  #11   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 5,600
Default How to programmatically add a non standard custom cell format

Well you got that working pdq !
I was just about to give it a go and quickly found it turning out to be
quite involved, to cater for various places, negative and presumably
rounding. Anyway glad you've got it working.

Regards,
Peter T

"tiamat" wrote in message
...
At : Peter

That did the trick :) works like a charm, thank you very much



  #12   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1
Default How to programmatically add a non standard custom cell format

"Rick Rothstein (MVP - VB)" wrote in
message ...
Firstly, to Rick
"Can you give us examples of the various type of values (0-9, 10-99,
100-999,
etc.) and show us how want them all to look? Also, can there be negative
values?"

Thanks for the interest but as you probably figured if one includes
negative
values and taking Excel's precision of 15. Then that would mean 15 * 2 =
30
conditional format combinations and 14 more I believe if precision is for
example 0.00000000000000123456789112345. I have probably got the numbers
wrong but throw in negative numbers and worse case scenario that is 88
conditional formats. Thats why I thought it was a bit ghastly and
discounted
it. I probably got the value extent wrong but you get my drift.


Why are you placing restrictions on what can and can't be done? In your
first post, you mentioned the possibility of using VBA code to accomplish
what you want... there are not very many restrictions on what you can and
cannot do with VBA code. I was not thinking of using conditional formats,
rather, I figured if the cell format I posted wouldn't work for you, then
I would attempt some event code to do what you want. The key for me (and
the other volunteers here I would guess) is to understand your question in
full. With that in mind, can you provide the example values and results
you want from them that I originally asked you for? And, if you would like
to handle negative values, indicate that and provide samples for them if
the results for negative values are not simply the same as for the
positive ones except for their minus signs.


Okay, I see you got it working using Peter's suggestion (which was roughly
what I had in mind for an event code solution)... Good! No need to post the
examples I asked about then.

Rick


  #13   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 5,600
Default How to programmatically add a non standard custom cell format

Although you didn't explicitly say I kind of assumed what subsequently
appears to have become my suggestion is what you had in mind earlier when
you asked the OP to give some more details.

In hindsight, although the example I gave might be required for some number
types, in the code for any six digit integer I would have applied your
suggestion for a numberformat

s = "#,""000"""

Regards,
Peter T


"Rick Rothstein (MVP - VB)" wrote in
message ...
"Rick Rothstein (MVP - VB)" wrote in
message ...



Okay, I see you got it working using Peter's suggestion (which was roughly
what I had in mind for an event code solution)... Good! No need to post

the
examples I asked about then.

Rick




Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
format cell custom Number format Dan Excel Worksheet Functions 2 January 26th 10 05:29 PM
Format Cell as custom type but data doesn't display like I custom. ToMMie Excel Discussion (Misc queries) 6 September 11th 08 08:31 AM
Custom Cell format to mimic time format [email protected] Excel Discussion (Misc queries) 6 November 7th 06 09:17 PM
Change the format of a cell Programmatically Bergfe Excel Programming 3 March 29th 06 01:35 PM
Change cell format programmatically Robert[_19_] Excel Programming 1 January 6th 04 05:04 PM


All times are GMT +1. The time now is 09:16 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"